Be 22, 
April 1984 & 
a Issue 10 Vol. 2, No. 4 
02220 £1.95 UK #ado.Canoda 


For Owners And Users Of Commodore VIC-20 And 64 Personal Computers 








CALENDAR. ROBOTS: The New 
Sola Mobile Computers 


a Robots on the mar- 

te Ss ket and in the home. 

j ~~  Aninside look at A 
Make any of four what they do, what f 
impressive calendars they cost, and what | 
with your VIC or 64.and_ to look for in the if i 
printer. years ahead. | 


NumericKeypad INE VETS 
Turn your VIC or 64 An exciting 

keyboard intoan —_ qction-strategy 
efficient numeric game farina Also In This Issue 


keypad with this 
short machine lan- VIC and 64. How To Start A 


guage program. User Group 


i a 


7148602220 





1 









SETETISIISTISIIIIEAN ppg 
Bi en 5 AoW, 
Datits Rtnthins 4 ese 





Little Known BASI 
Commands : 


04 


Adding A Second 
Joystick To The VIC 


it} 




























































































___ The Most Powerful $49.95 Cartridge Word Processor _ 
for the Commodore 64™ 
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The WRITE NOW! Word Processor 
provides you with the easiest to use 
& fastest to leam format available 





* save textto tape or disk, 


* sends any ‘special’ codes to the 
printer— even in the middle of 


foryourC-64. Itgivesyouthe spec 
features you expect ina pee ane eee bea 
rofessional word processor & 
Aspe unique feared not x oetenc Joystick control for 
scrolling. 


available in any other C-64 word 
[elferersscrol 

With WRITE NOW! you have 
unlimited recall of often used text; 


Included with WRITE NOW! is a 100 
plus page easy-to-understand. 
instruction booklet— alll for the 
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No matter what your business 
or interest, with Superbase 64 
you have a totally flexible 
‘record’ system, as big as you 
want it, as fast as you need it. 


Create your own 
formats, enter your records, 
change layouts and datafields., 

Superbase gives you 
unrivalled control in home or 
office, business or 
professional practice, with 
arange of features 
including: 


Precision Software (USA), Inc. 
Suite 11D 
even 

Precision Ny. 10128 


Software (212) 4103418 
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“Make note of that name, Electronic Ats. 
Itmay well set the standard for sophisticated 


entertainment software in the 80s: 


—Creative Computing. 
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THE COMMODORE. 


ARCHON”™ by Free Fall Associates 
“No review could possiblydo _—_*... the offices of A.N.A:L.O.G. 
more than hintatthe manifold echo with the searing roar of 




















excellence of Archon. It is dragon-fire and shouted 
truly a landmark in the devel- obscenities from angry players. 
opment of computerized Archon turns friend against 
strategy games. —Video friend and inspires grudges that 
“you're bound to fall for it. can last for days. What better 
Imagineachessgameinwhich compliment can you give to a 
you can cast spells,” computer program: 
~Creative Computing -ANALOG. 
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HARD HAT MACK" 
by Michael Abbot and 
Matthew Alexander 
“An outstanding, st 
art game, Hard Hat Mack is the 
blue collar hero of this three 
screen climbing game and his 
tasks are far from simple.” 
—Arcade Express 


“If you put Hard Hat Mack 
in the ring with all other 
games on the market, it 
a 


would win most bouts in 

the opening seconds of the 

first round. It’s that good.” 
—Softalk 
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MURDER ON THE 
ZINDERNEUF™ 
by Free Fall Associates 
“Whodunit fans, drop your 
Agatha Christie and come 
running. Thisis your game! The 
graphics are among the most 
M. Bite colorful and attractive I have 
LUISE: seen in any game!"—Antic 
by Ozark Softscape 
“A must-have” 
—Electronic Fun 
“May well become the Monopoly 
of computer games” 
—Personal Software 
“Graphics, sound and humor 
are superlative” 

—Creative Computing 
“Recommendation? Buy it” 
—Softline 
BEST MULTI-PLAYER 
GAME OF THE 
YEAR 
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CONSTRUCTION SET™ 
by Bill Budge 
“The best program ever written 
&-bit ma He 





“A fully integrated 
graphics-oriented 
design tool that lets 
you create your own 
video pinball games, 
required study forall serious 
software authors” 

—-ANALOG. 
“A tour de force” 
Creative Computing 
MOST ORIGINAL GAME OF THE YEAR 
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BRUTAL! RUTHLESS! UNPREDICTABLE! 





IN THIS GAM Okay, boss, now what do we do? Research & Development is work- 
ing round the clock coming up with new products, the warehouse 


You REALLY GET is overflowing, the advertising agency wants more money, your 


customers are fickle, and the competition just slashed their prices. 


THE BUSINESS. 2 Were all waiting for your decision. 


Put yourself at the helm of this enterprising new software company. 
Every major decision is in your hands. Use your logic and intuition to 
spot market trends. Keep a close eye in your balance sheet. Get a 
grip on your company, a leg up on your competition, and a strangle- 
hold on the market, Do you have what it takes to be King of Silicon 
Valley? Or will you end up selling apples on skid row? 


Intense strategic challenge combined with a real education in the 
workings of big business make In The Chips one game anyone can 
profit from. 


IN THE CHIPS.” Concept Education for the VIC-20, 
Commodore 64, IBM PC and PCjr. 
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Thad originally planned to write 
about Jack Tramiel’s recent res- 
ignation from Commodore. He 
was its president, chief execu- 
tive officer, and, not least, its 
founder. After starting the com- 
pany 25 years ago, he has beena 
critical force in shaping this 
entire industry. Recent events, 
however, dictated that I pull 
that editorial and replace it with 
this one. 

We all have visions of this 
industry of ours and where it’s 
going. One of mine has always 
been to disseminate all types of 
interesting, useful software 
through a magazine. We've done 
that, done it well. And we've 
grown rapidly in the few years 
since this industry began and 
our company began—with your 
continued readership, support, 
and contributions of feedback, 
programs, articles, etc. 

For a long time we've been 
looking ahead, asking how we 
can help. That's a collective we. 
How can we move to a new 
plateau? Knowing that we 
wanted to be able to move further 
in our goal of efficient dissemi-- 
nation of software, we started 
the first of what I hope will be- 
come several disk magazines. 
We chose the GAZETTE to start 
with because it was the easiest 
to transfer onto the new medium. 
The logistics are, nevertheless, 
incredible. 

The final decision was to 
price our disk version of the 
magazine at a ‘‘mass-market’’ 
price, not at an incredible mark- 
up. Those of you who have been 
readers of our publications for 
some time are well aware that 
hundreds of dollars worth of 
software is found within the 
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pages of our magazines. Some- 
times in a single issue. Our deci- 
sion was to carry this thinking, 
this philosophy, and these goals 
forward into the new disk 
magazine. 

The response has been ex- 
cellent, with one exception. Be- 
ginning several weeks ago, and 
with increasing frequency, we're 
getting calls from individuals 
and user groups inquiring if the 
disk will be copy protected. 

Our thinking was that we 
could price the disk magazine 
(for the first time in the industry) 
ata price only slightly higher 
than a blank disk costs in many 
retail stores. We expected to be 
able to do this without adding 
protection. We wouldn’t need to 
build in a giant profit margin to 
cover theft, we decided; we'd 
simply make the pricing very 
reasonable. We’re wondering if 
that thinking is correct. 

Many of our authors spend 
dozens, sometimes hundreds, of 
hours developing the programs 
that we print in this magazine 
each month, In return, they’re 
paid for their work. They'll earn 
additional royalties on diskette 
subscriptions—except for disk- 
ettes that are shared among doz- 
ens of users. Our in-house staff 
spends a comparable amount of 
time rewriting, testing, and 
translating programs to work on 
various computers. And they’re 
paid for their work as well. We 
truly do not understand the 
mentality which advocates a 
“sharing’’ that, in effect, reduces 
the wages of these authors. 

Iassume that most of us 
would resent this sort of theft if 
it happened to us personally. 
Few of us would take the result of 


our efforts, something we pro- 
duced for wages, and give it toa 
user group or a group of friends, 
saying, ‘This is a portion of my 
livelihood. Use it freely, knowing 
that every time you share it you 
are reducing my salary by an 
equivalent percentage.” 

If our expectations were off 
the mark, we should be charging 
$25 for each disk instead of less 
than $6. 

I would welcome some feed- 
back on this. Please address your 
comments, thoughts, or argu- 
ments to me, Personal and Con- 
fidential, at the address below. 
I'll read them all and respond to 
them in a future issue. Please 
indicate whether your letter (or 
parts of it) may be printed in the 
magazine. 

It’s not my intention to 
create a stir, but I think that asa 
group of intelligent, active, in- 
terested users we should start a 
discussion on this. Unfortu- 
nately, we're probably going to 
have to protect the disks for now. 
And the reason for this editorial, 
the reason for my chagrin, is 
that we're fundamentally op- 
posed to such protection. We 
had decided we would be able to 
approach it all differently. 

I'm looking forward to 
hearing from you. 


plat Goch. 


Editor In Chief 





Post Office Box 5406 
Greensboro, NC 27403 





Handic —A Complete Line 
of Products to Keep Your 
Commodore 64 Busy 


—Everyday! 







Develop your bridge 
skills 


Whether you're an experienced bridge 
player or a beginner, polish your skills or 
learn the game with BRIDGE 64. P! 
North-South, then switch to 
the same deal, the return to that deal again 











Handle your home Acomplete database and test your skill with a different strategy. 
budget, stock portfolio, | for the home | 
loans and mortgages Addresses, telephone numbers, appoint- 
| ments, birthdays, or records-whatever you 
with Calc Result | want to remember-put it on DIARY, an 
Calc Result Easy is a simple-to-use spread- | electronic notebook for home use. DIARY 
sheet program for the Commodore 64. It comes on a plug-in cartridge. Its easy to | 
includes 254 lines x 64 columns, built-in use and easy to learn, giving you the 
graphics, and flexible printout formats. flexibility to design a personal calendar 


Plug-in cartridge... just plug it in and its | or address book. 
ready. Perfect for cash flow analysis, perso- | 
nal net worth, IRA analysis, travel expenses, | 
credit card expenditures, gas and elec- 


tricity bills, etc. 





Bridge $39.95 
Handic-—for the 
broadest range of 
Commodore products 


As the largest independent developer of 

Commodore software and accessor! 

Handic's broad range of busine: 

2 tion and recreation products are 

|| Diary $29.95 | ¢xclusively for the Commodore u 
ay demands quality and reliability, 





| Tarn statistical ve a Hardeoare 
wa 
information into SeteesrieS sre Computer 
Calc Result Easy $49.95 graphic format 
Calc Result Advanced gives you 32 pages of | GRAF 64 converts mathematical functions | 
interrelated information. The three-dimen- into graphical analysis on the Commodore | 
sional feature allows you to consolidate 64. An ideal program for studying math. 
calculations in summary format. Calc Re- Define a function, set the limits of an axis, 
sult Advanced comes on plug-in cartridge | plot a graph and display the extreme For more information and a catalogue of 


dore dealer, or call us direct. 





and disk. Disk drive required. | points, intersection values, etc. our products, see your nearest Commo- 






Handic Software, Inc. 
Fellowship Business Center 
520 Fellowship Road, B 206 
SESS 3 Mount Laurel, NJ 08054 
— ——— | Phone (609)663-0660 
Calc Result Advanced $99.95 Graf 64$29.95 | concn 
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WordPro 3 Plus /64 


The #1 Selling Word Processor for the Commodore 64™ 


ORE a ; 
WordPro 3 Plus™/64 and SpellRight Plus™ provide a total word 
processing solution for the Commodore 64™ which gives you: 


* Sophisticated Word Processing 

Built-in Mail Merging for Form Letters 

Math Functions for Column Totals 

* Fast and Complete Spell Checking via SpellRight Plus 
* A Super Value (two programs) for Only $99.95! 


WordPro and SpellRight are both specifically designed for the 
novice user with no computer or word processing experience 
whatsoever. And with over 40,000 WordPro versions sold, you 
can be sure that WordPro is a very sophisticated word 
processor loaded with powerful features including: Transfer, 
Insert, Delete, and Rearrange Text, Auto Page Numbering, Math 
Functions, Headers, Footers, Global Search and Replace, the 
Ability to Create Multiple Personalized Letters and Documents, 
and much more. WordPro can create documents of virtually 
any length and will print up to 165 columns wide. You get all of 
ate PLUS fast and complete spell checking using SpellRight 
us! 


* 
* 


WordPro 3 Plus"/64 and SpellRight Plus™ are trademarks of Professional Software Inc. 


" 





SpellRight Plus locates and highlights misspelled words and 
then allows you to quickly correct the misspellings — 
improving the quality of your letters and reports. 

And, best of all, WordPro and SpellRight’s powerful arsenal 
of features can be put to use almost immediately — by even 
the novice user. So whether you're a student, professional 
writer, in business, education or a hobbyist, you'll quickly 
become a WordPro Pro! 


Both WordPro and SpellRight Plus are also available separately 
at popular computer outlets nationwide. 


Invest in the best. ..WordPro Plus. Ina class by itself. 


Professional Software Inc. 
51 Fremont Street (617) 444-5224 
Needham, MA 02194 Telex: 951579 


Dealer and Distributor inquiries are invited. 


The WordPro Plus Series was designed and written by Steve Punter of Pro-Micro Software Ltd 
SpellRight Plus was designed and written by Dwight Huff and Joe Spatafora of SpellMaster Systems, Inc. 
Some printers may not support certain WordPro 3 Plus functions and/or require an interface. Please check with your dealer. 


Commodore 64” is a trademark of Commodore Electronics Ltd. 


GAZETTE FEEDBACK 


EDITORS AND READERS 


Do you have a question or a problem? Have 
ou discovered something that could help other 
1C-20 and Commodore 64 users? Do you have 
a comment about something you've read in 
COMPUTE!’s GAZETTE? We want to hear from you. 
Write to Gazette Feedback, COMPUTE!’s GAZETTE, 
P.O. Box 5406, Greensboro, NC 27403. 


The Datassette Mystery Ground 
Wire 


I own a Commodore 64 and recently encountered 
a problem that I thought should be passed on to 
‘ou. 
i The ground braid wire (the silver-colored 
bare wire) attached to the Commodore Datassette 
plug accidentally came in contact with a metal tab 
in the user I/O port and permanently damaged a 
few chips in the computer. I had to take the 64 to 
a service center to be repaired. Even though the 
computer was only five weeks old, the damage 
was not covered by the warranty. I had to pay for 
the repairs myself. 

In the instruction manual supplied with the 
Datassette, there is no mention made of either the 
uses for this wire or the aforementioned dangers. 

What is this ground wire to be used for, and 
is it needed? 

Frank Harris 


A Commodore representative informed us that the 
ground braid wire is not needed on the Commodore 64 
or the VIC-20, nor is there any place to attach it. If the 
wire touches the metal tabs in the I/O port, it can indeed 
do damage. 

The easiest way to prevent this is to wind the 
braided wire around the cassette’s cord and then tape it 
in place. 

You could simply cut it off, but consider this: The 
ground wire is required for use with Commodore busi- 
ness computers. If the Datassette might be used with 
one of Commodore's business computers, leave it on— 
it's required by FCC (Federal Communications Com- 
mission) regulations. A Datassette connected to one of 
their commercial computers without the grow «4 braid 
also connected can cause serious television 01 “10 
interference. 
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If your Datassette will be used only with a VIC or 
a 64, then cutting it off is a solution. It won't harm the 
Datassette or the computer. 


Programming On The 64 

In the memory map included in the Commodore 64 
Programmer's Reference Guide, locations 124-138 
($7C-$8A) are not shown. Whatare these locations 
for? Can they be used in machine language 
programs? 

Is it possible to write programs on the 64 that 
will run automatically when they are loaded? If 
so, how is it done? 

How can I change the name of a disk with 
programs on it without destroying or erasing the 
programs? 

John W. Pitkin 


Bytes 124-138 are mentioned in the reference guide on 
page 313. This area of zero-page memory is part of the 
very important CHRGET subroutine, located at ad- 
dresses 115 to 138. 

The CHRGET routine gets the next byte of BASIC 
text. When you run a BASIC program, this routine 
scans the BASIC program lines looking for such things 
as command tokens, commas in DATA statements, etc. 
When they are found, they are processed by the BASIC 
interpreter, the commands are executed, and CHRGET 
scans for the next token, 

Because this routine is essential to BASIC, you 
should not POKE this area or use it for machine lan- 
guage. If you're a machine language programmer, this 
is a good place for a “wedge.” For instance, if you want 
to change some of the BASIC commands, you can look 
for your character or token with the CHRGET routine 
and process it accordingly. 

To see just how important this small 24-byte sub- 
routine is, enter and RUN this short BASIC program: 


10 FOR A=115 TO 138: POKE A,0: NEXT 


After RUNning, try typing something from the 
keyboard, then press RETURN. As you can see, the 64 
is unusable. Even RUN/STOP—RESTORE won't help. 

However, these locations should be OK to use in 
pure machine language programs that never access 
BASIC. 

To answer your second question, yes, it is possible 
to LOAD and RUN a program automatically without 
pressing the SHIFT/RUN keys. 


Scarborough Sys , INC. 25 N.Broadwayé Tarrytown, New York 10591 





Changing the name (or header) of a diskette after 
it contains programs is trickky—and dangerous—busi- 
ness, but it can be done. 

Track 18, sector 0 of the Commodore diskettes 
contains the directory information (what you see when 
you enter LOAD “$”,8:LIST) and the diskette header. 
The partial layout looks like this: 

Bytes 0-1 Pointer to directory 

Bytes 4-143 Block Availability Map (BAM) 

Bytes 144-161 Name of diskette 

Bytes 162-163 Diskette’s two-character ID 
The 18-byte area (144-161) that is used for the diskette 
name contains the name plus shifted spaces (CHR$ 
160) to fill the 18 bytes. It is possible to change these 
bytes on the diskette, but if it is done incorrectly the 
BAM could be altered, and you might not be able to 
access the programs on the diskette. It's safer to simply 
format a new diskette with the desired name. 


Using The Super Expander With 


‘The Automatic Proofreader”’ 
I recently purchased a VIC-20 Super Expander car- 
tridge, and have discovered something discouraging 
about it. When “The Automatic Proofreader” is 
running and I try to use the KEY command or any 
of the function keys, the computer won’t cooperate 
and sometimes crashes. What would cause this to 
happen, and what can I do about it? 

William O'Connor 


There is nothing wrong with your Super Expander car- 
tridge. ‘The Automatic Proofreader” should not be used 
with the Super Expander cartridge plugged in. Both the 
cartridge and The Autgmatic Proofreader wedge a 
machine language program into the same area of the VIC’s 
memory. This conflict causes your VIC to crash. 

Although the Super Expander is incompatible with 
The Automatic Proofreader, other memory expansion 
cartridges will work fine. 


Can I Use A ViCmodem With 

A Speaker Phone? 

I belong to several user groups and communicate 
with members on the telephone about specific 
problems and programs. I have found that having 
a telephone beside my computer is very helpful, 
because I can work with the computer while talk- 
ing to someone about a problem. I just purchased 
the VICmodem, and now want to purchase a tele- 
phone that can stay in my work area. 

A speaker telephone would be great because 
both my hands could be free for the computer. 
The speaker telephone that I am interested in has 
a plug on the rear of the unit (to plug in a regular 
handset telephone). If I purchase a short telephone 
extension cord, can I plug one end of the cord in 
the modem and the other end into the modular 
plug on the rear of the speaker telephone? Will 
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the modem function properly with this type of 
hookup? 


Jim Kohlenberg 


Connectors for modular telephone cords come in two 
sizes: one size on the cord that connects the phone to the 
wall plug, and a smaller size on the cord between the 
phone body and handset. The VICmodem takes the 
smaller, handset connector. 

Another modem, of the auto-answer/auto-dial 
type, takes the larger connector and plugs into the wall 
outlet. This type of modem works without a telephone. 

Remember that the VICmodem is designed to con- 
nect to a standard desk phone (with either a dial or 
Touch-Tone buttons). You use the telephone to dial, 
and to make the connection with the other computer's 
phone, then you remove the cord from the handset and 
plug it into the modem. At this point your terminal 
software should send a signal to the other computer that 
you are ready to communicate, 

If that plug on your speaker phone is of the smaller 
size designed to take an extension handset, you should 
be able to connect the VICmodem directly to the speaker 
phone, using a handset-to-phone cord. 

However, if the plug on your speaker phone is 
meant to hook up an extension telephone, you cannot 
directly connect the modem. 

You should also consider that, while a speaker 
phone might have advantages for voice communications, 
it can cause problems when you're using the modem. If 
the speaker is activated at the same time as the modem, 
chances are good that sounds picked up by the micro- 
phone will garble the modem transmissions. Also, in- 
coming signals will be broadcast over the speaker. This 
might be interesting at first, but it will wear on your 
nerves after a while. 

Also, a wide variety of telephone models are avail- 
able, and many have special features which make them 
incompatible with direct-connect modems like the VIC- 
modem. Before you purchase any phone (except the 
standard desk set) for use with a modem, you should 
make certain that the two are compatible. Discuss your 
intended application with a technician at the phone 
store, and, if possible, talk to someone who is already 
using your brand of modem with the phone model you 
want to buy. 


Cold Starting 


Is there any way to reset the VIC-20 without 
turning it off? 
Edward Wiebe 


Yes, there is. If you enter SYS 64802 then press RE- 
TURN, the VIC-20 will go through most of the same 
reset routines that are performed when you first turn it 
on. This SYS will reset the BASIC pointers, reset the 
VIC chip, etc. The corresponding SYS address on the 
Commodore 64 is 64738. This technique is often called 
acold start. When you turn on your computer with 
the power switch, you are also performing a cold start. 


Now that you have it, put it to work. C64 
TUTOR puts you in charge with a Commodore 
64 tutorial, screen display editor, sprite editor, 
music synthesizer & programmer's calculator. 

Use the tutorial to learn what your 
Commodore 64 can do. And how to do if. 
Create, edit G save one page of letters 
and/or pictures with the screen display editor. 
Enter sprites from the Commodore Manual. 
Or make up your own, Then edit and save 
them using the sprite editor, Sprite creation is 
quick, and easy. Play music with the music 
synthesizer. Use the programmer's calculator 
to add, subtract, multiply & divide in decimal, 
hexadecimal and binary. Includes AND, OR, 
XOR, Shift and 1's complement functions. 


BREATHE LIFE INTO: YOURC64 


Great for new users. C64 TUTOR cures 
computerphobia and promotes computer 
literacy. 

Take it from me. with a little power, the 
possibilities are endless. 

Available for $29.95 at your computer 
deoler, 












Rated THE BEST educational 
program for the VIC 207M by 
Creative Computing magazine. 
Commodore 64 version: “This 
is the best typing tutor we have 
seen yet; it can get your 
children touch typing in short 
order and bring an old hand up 
to speed, Includes excellent 
training modules and an 
argade type mode to liven 
things up and put some 
pressure on; * x +" INFO-64 
Our customers continue to tell 
us of their success. ... 

‘'.. delighted with my son's 
progress ... he is the only 

‘one in his second grade class 
who touch types at the computer." 
(58 year old man writes) ... “great, excellent. To me a source 
of great learning... | just can't expross how much | have 
enjoyed it!” 

In daily use by schools across the USA. 


“Computer aided instruction at its best" Commander magazine 
TYPING TUTOR + WORD INVADERS 
The proven way to learn touch typing. 
COMMODORE 64 Tape $21.95 
COMMODORE 64 Disk $24.95 

VIC 20 (unexpanded) Tape $21.95 


sf 
NEW! 
IFR 

(FLIGHT SIMULATOR), 
CARTRIDGE 

FOR THE VIC 20 


COMMODORE 64 
DISK OR TAPE 


$39.95 
JOYSTICK REQUIRED 







Put yourself in the pilot's saat! A very challenging realistic 
simulation of Instrument flying in a light plane, Take off, 
navigate over difficult terrain, and land at one of the 4 airports. 
Artificial horizon, ILS, and other working instruments on screen. 
Full aircraft features. Realistic aircraft performance — 
stalls/spins, etc. Transport yourself to a real-time adventure in 
the sky. Flight tested by professional pilots and judged 
“terrific! 
Shipping and handling $1.00 per Cc 

order. CA residents add 6% tax 


ACADEMY 
SOFTVVARE 


P.O, Box 6277, San Rafael, CA 94903 (415) 499-0850 
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game 





Progre rs: Write to our New Program Mat 
‘any exceptional VIC 207M or Commodor 


or other program you have developed. 














Transferring Data From BASIC 
To Machine Language 
If there is a numeric constant (2, for example) that 
you want to pass to a machine language program, 
you can do so with the USR command. But how 
can you transfer numbers from BASIC to a 
machine language subroutine without using the 
USR command? 

Heimo Ponnath 
Using the POKE statement for passing parameters 
(data) to a machine language (ML) routine from BASIC 
is probably easier than using the USR command. 

Before you SYS (transfer control) to your ML 
subroutine, POKE a byte or bytes with the data you 
want to transfer, then pick it up in the ML program 
with either the LDA, LDX, or LDY commands. Here‘s 
an example. 


In BASIC: 


300 A=57 
310 POKE 251,A 
320 SYS 4096 


In machine language: 


$1000 CLC 
$1001 LDA $FB 
(load the accumulator with the transferred data) 
$1003 ADC #$05 
$1005 etc... 


Here it is in reverse (transferring data back to BASIC). 
In machine language: 


$1C49 STA $FB 

(store value of data in the accumulator into byte 
number 251) 
$1C4B RTS 


In BASIC: 


500 A =PEEK(251) 

510 continue BASIC program... 
With the single POKE you can transfer values of 0-255 
back and forth. If you want to transfer values larger 
than 255, you can use the following formula. 
Where N=number to be stored: 

NN=INT(N/256):POKE byte1,N-(NN*256):POKE 

byte2,NN 

This method will automatically store a number from 0 
to 65535 using the standard LBHB (low byte, high 
byte) format. That is, it will POKE byte 1 with the 
least significant value, and byte 2 with the most signifi- 
cant, You can then branch to your ML routine and 
process your values as you wish, 

Some good areas on the VIC for temporary data 
storage while doing the transfer are: 


bytes 828-1019 cassette buffer 
bytes 251-254 free zero-page locations 


On the Commodore 64, you can use the above, plus: 


bytes 679-767 unused 
bytes 49152-53247 free RAM @ 


Finally, aliens your 





kids can reason with 


tead of destroy. 


Spinnaker computer games are lots of fun. They're also 
Instructive, Not destructive. That's why IN SEARCH OF THE 
MOST AMAZING THING lets your kids negotiate with aliens. 
Not destroy them 
It's Amazingly Fun! 

The Most Amazing Thing is out there somewhere. Find- 
ing It won't be easy. Luckily, your kids will have the help. 
of old Uncle Smoke Bailey. Because they'll have to fly the 
B-liner, avoid dangerous Mire Crabs, and trade with aliens. 

It takes skill, persistence and imagination to find The Most 
Amazing Thing. Because it’s the most elusive thing in the 
whole wide galaxy, But that’s what makes It so exciting, 
It's Amazingly Educational! 

Like all Spinnaker games, IN SEARCH OF THE MOST 








AMAZING THING has real educational value. 

Your kids will sharpen their ability to estimate distances 
and quantities, and will become more aware of direction 
and time. They'll develop a knack for economic principles, 
and learn to solve problems through trial and error. 

So if you're looking for exciting computer games that 
give your kids something to think about, just go IN SEARCH 
OF THE MOST AMAZING THING at your local 
retailer,” It's so much fun 
you'll probably be tempt-; 
ed to play it yourself. 





Commodore's 
New Computer 
Family: 


News From The Winter 
Consumer Electronics Show 


Selby Bateman, Assistant Editor 


A new line of Commodore computers with 
built-in software options—the 264 family— 
created the biggest stir among computer in- 
dustry retailers and distributors at the 1984 
Winter Consumer Electronics Show (CES). 
Commodore also displayed a growing collec- 
tion of 64 and VIC-20 software, a faster disk 
drive, and a new video monitor. Here’s a report 
on the new products and the new choices facing 
owners and users of Commodore computers. 
a SSS 


pproximately 90,000 people crowded 

their way into the Winter Consumer 

Electronics Show, a breathtaking array 

of almost every conceivable electronic 
audio, video, computer, appliance, and peripheral 
product that manufacturers hope to sell during 
1984, 

Over one-fourth of the 725,000 square feet of 
exhibit space this year was devoted to computer- 
related displays, and nearly 300 of the more than 
1300 exhibitors represented computer products—a 
record on both counts. 

Among the hundreds of exhibition booths 
at CES, none seemed to attract more activity 
and curiosity than Commodore's large gray and 
blue display on the floor of the Las Vegas Con- 
vention Center. 

The company announced that during 1983 it 
became the first microcomputer firm to top the $1 
billion mark in sales, more than doubling its $458 
million 1982 sales figures. Commodore officials 
said that all four of its microcomputer models—64, 
VIC-20, PET, and CBM—achieved record sales 
levels during 1983. 
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But the biggest news was the announcement 
of the new 264 family of Commodore computers, 
which will contain a consumer-selectable choice 
of built-in software; a stronger BASIC language, 
with 60K available for BASIC programming (the 
Commodore 64 has less than 40K of usable BASIC 
RAM) and more than 75 BASIC commands; a new 
keyboard that includes a HELP key, four separate 
cursor keys, and other programmable function 
keys; screen windowing capability; and a built-in 
machine language monitor with 12 commands. 

Acompany representative says the 264 should 
be available by April 1. Customers will be able to 
purchase the 264 with one of several application 
program options built into ROM, such as a word 
processor, spreadsheet, or data base manager. 
The consumer may have a choice of additional 
software on plug-in ROM chips, but details of the 
various options were still being developed during 
CES. Although Commodore announced no price 
for the 264, company representatives indicate the 
retail price will be under $500. 


Wat the new 264 series does not have is almost 
as interesting as what it does. The Commodore 
64’s versatile SID (Sound Interface Device) chip, 
which features three independent voices over 
nine octaves, had been replaced by two tone 
generators. That will mean a reduction in sound 
and music capability. And the 64’s eight pro- 
grammable, independently moveable sprites have 
not been included in the 264. 

Although Commodore says that virtually all 
of the VIC-20 and 64 peripherals are compatible 
with the 264, the software is not. Internally the 
264 is significantly different than older Commo- 
dores because of its new operating system and 
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Introduci 
that will bring 





a computer game 
out the railroad buff, the tycoon, 


the qivelearer and the kid in your kid. 


TRAINS Is one computer game that will really bring out 
the best in kids. Of all ages. 

Because TRAINS is a Spinnaker game, which means It’s 
a learning game that’s really fun to play. 

TRAINS puts kids in charge of an old-time railroad. And 
whether their railway empire gets bigger or goes out of 
business Is entirely up to them. 

As they juggle the challenges of picking up supplies and 
delivering to various Industries, paying their employees, 
keeping the locomotive filled with coal, and making enough 
money to venture Into new territories, kids are Sey 


learning the economics of running a business, 
They're learning to manage financial resources, and to 

use different kinds of information in setting priorities 
And best of all, they're having fun while they learn. 
Look for TRAINS on disk at your 

local software 


retailer, and play 
iton your Apple,” 
IBM,” Atari,* or 
Commodore 64™ 
computers. 
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We make learning fun. 
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BASIC. Even the cassette buffer has been slightly 
relocated in memory. Also, the central processing 
unit (CPU) is not the 6502/6510 chip found in the 
VIC and 64; it is a new chip called the 7501. 
Luckily, the 7501 appears to be largely compatible 
with the 6500-series chips, sharing the same in- 
struction set. 


T! 
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Commodore's new 264 computer, showing the four separate 
cursor keys (lower right) and the four programmable function 
keys (at left above keyboard). The Commodore 364 will have a 
similar console, but with a 19-key numeric keypad above the 
cursor keys. 


What does all this mean? BASIC programs 
written for the VIC and 64 which do not rely 
heavily on PEEKs, POKEs, sound, or sprite 
graphics probably will work with very little mod- 
ification on the 264-series computers. But machine 
language programs—and BASIC programs which 
manipulate memory with PEEKs and POKEs—will 
need much more translating before they'll work 
on the 264. Almost all commercial software falls 
into the latter category. Commodore estimates 
that 80 to 90 percent of VIC and 64 programs 
should be adaptable to the 264. 

Commodore emphasizes that the new family 
of computers in no way indicates a lessening of 
support by Commodore for the 64, the VIC-20, or 
the company’s other microcomputers. As one 
Commodore official says, the 264 is not directed 
at the same set of consumers as are the other prod- 
ucts, especially the top-selling Commodore 64. The 
264 offers built-in software for word processing, 
spreadsheet analysis, data base management, or 
other small business applications, notes Myrddin 
Jones, Commodore’s vice president for marketing 
(see interview elsewhere in this issue). The 64 is 
more oriented toward music, sprites, and gaming, 
he adds. 

Commodore is counting on the 264 family to 
complement the 64, VIC-20, and the others, rather 
than to compete with them, Jones says. 


The new Commodore hardware products and 
options include the following: 
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© Commodore 264—In addition to the features 
mentioned above, the 264 has 128 colors (16 colors 
with 8 luminance levels); eight volume levels; a 
newly designed 67-key keyboard with four re- 
programmable function keys; input/output (I/O) 
ports compatible with 64 and VIC-20 peripherals; 
and display, resolution, and character features 
similar to the 64. 

© Commodore 364—Based on the 264, the 
364 has built-in speech capability with a 250-plus 
word capacity (additional vocabulary can be 
loaded from optional cartridges or disks); 48K 
ROM, including operating system, BASIC inter- 
preter, and speech operating system (up to 48K 
additional ROM can be added with various built-in 
software options); and an 86-key full-stroke 
keyboard with a 19-key numeric keypad. No 
suggested price was announced, One Commodore 
representative said the 364 is expected to be avail- 
able by the end of the summer. 

@ SX64 Portable Computer—Formerly intro- 
duced as the SX-100 and later the Executive 64, 
the SX64 is a portable 64 rather than a 264-based 
machine. The SX64 has a built-in 5-inch color 
monitor, a 170K built-in 5Y%-inch floppy disk drive 
(second drive optional), plus other features identical 
to the Commodore 64, The retail price is $995. 

@ 1703 Color Monitor—Housed in a charcoal 
gray box, the new Commodore monitor is similar 
in other ways to the earlier 1702 and 1701. The 
1703 has a 13-inch diagonal screen and is compat- 
ible with the 264 line as well as with the 64, VIC-20, 
and SX64. 

@ SFS 481 Fast Disk Drive—The new 54-inch 
Commodore disk drive, for use with the 264 and 
364 only, is reportedly five times faster than the 
1541 drive. 

@ 1542 Disk Drive—An upgraded version of 
the 1541. Further details will be announced by 
Commodore. 

@ Commodore TouchScreen—A plastic over- 
lay that can be fitted over the front of a television 
set or a video monitor, the new TouchScreen al- 
lows the user to bypass the keyboard completely 
in order to operate such programs as Commodore's 
Magic Desk or to create graphics with the touch 
of a finger. No word yet on availability or price. 

@ Commodore Light Pen—A pressure- 
sensitive mechanism near the point of this light 
pen allows you to draw and to move objects on 
the screen and to control programs such as Magic 
Desk. 

© Magic Voice Speech Module—The speech 
module plugs into the User Port of the Commo- 
dore 64, and contains an additional port into which 
other cartridges can be inserted. The module has 
a built-in vocabulary of 235 words, spoken by 
what sounds like a female voice. Words can be 
user-defined for various speeds and programmed 























































The day you bring your first CAI™ learning 
game home and watch your child play, 
you'll know the excitement of a winning 
choice. 

Active Family 

Your family and CAI's growing family of 
animated, full-color programs have a lot to 
share —beginning with a willingness to 
reach beyond the ordinary to achieve the 
best. 

At Your Command 

You may meet a princess, a juggler or a 
dragon in Wizard of Words.™ You may 
appear as a guest on TV in Master Match,™ 
The Game Show™ or Tic Tac Show.™ Or, 
you may extend these programs still further 
with our LearningWare™ diskettes, offering 
hundreds of questions matched to the 
teaching strategies in the games. In every 
case, CAI puts a world of imagination and 
learning at your fingertips. And puts you 
and your child in control. 

Unique Approach 

Key features place CAI thinking tools ina 
class by themselves: Each program comes 
with its own library of subjects. But that's 
just the start. Our unique authoring system 
let's you or your child create your own 
lessons on any topic, tailoring the program 
to your family’s needs —and no computer 
knowledge is required. Add the fact that 
we've kept the vital ingredient —FUN - in 
learning, and ourproven success is no 
surprise. Over 2,000 school districts now 
use CAI programs to teach essential 
vocabulary and logic skills in a variety of 
subject areas. 
CAI supports its products —and you —with 
an unconditional guarantee and a free 
backup disk. And provides compatibility 
with the most popular computers: Apple,® 
IBM® (and soon Commodore™ ). 

Wise Choice 

CAI is a group of experienced educators 
and programmers who believe that success 
begins with opportunities you create at 
home. Ask to see a demonstration of CAI 
programs at your local computer store, and 
see for yourself just how rewarding a good 
education can be. 
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1442A Walnut Street, Suite 341 
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directly from BASIC and/or machine language. 
Commodore promises that more words and dif- 
ferent voices will be available in the future on 
disk and cartridge. The speech module has a 
suggested price of $59.95 and can be plugged into 
the SX64 portable computer as well. 

The introduction of the 264 line meant that 
Commodore was one of the few computer com- 
panies to introduce a new machine at the four-day 
CES show, a far cry from last summer's CES in 
Chicago. Seventeen new microcomputers were 
introduced at that time. 


Atari, Inc. introduced no new computers at 
the winter CES. Apple showed up for the first 
time in three years, but chose not to unveil its 
MacIntosh at the show. IBM had no exhibit at all. 
Coleco introduced some new peripherals for its 
Adam computer, including an add-on tape drive, 
a disk drive, 1200-baud modem, and a 64K mem- 
ory expander. Spectravideo announced two new 
computers, and a British company exhibited pro- 
totypes of a new machine which might reach the 
U.S. later this year. But none of these booths were 
as consistently crowded as Commodore's. 


Commodore is continuing to expand its software 
line and announced a variety of personal produc- 
tivity and game offerings. 

For the Commodore 264, Sig Hartmann, presi- 
dent of Commodore Software, says that the com- 
pany plans to have more than 30 software products 
available on cartridge, disk, and tape when the 
264 goes on sale. “The key area we're emphasizing 
in software for the Commodore 264 is productiv- 
ity, covering such areas as household manage- 
ment, word processing, calculation, business 
accounting, and education,” says Hartmann. 

Commodore is continuing to encourage third- 
party software development for its computers, 
and introduced a number of new packages which 
were created for it by such companies as Data 20, 
Digital Research, Infocom, Island Graphics, and 
others. For example, Data 20 Corporation of 
Laguna Hills, California, created word processing, 
spreadsheet, and graph software on ROM chips 
for the new 264 computer line, some of which will 
be built-in and some of which will be cartridge 
add-ons. 

Of the more than 200 Commodore-brand 
software products now in distribution, more than 
half were produced by outside developers, a com- 
pany official notes. 

Among the new products are seven personal 
productivity packages, which are scheduled to be 
available by late spring on cartridge or disk for 
the Commodore 64 and 264. Several of the pro- 
grams are planned as built-in software options for 
the 264 as well. The packages are: 
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© Magic Desk II—Based on the Magic Desk I— 
Type and File cartridge introduced last year, this is 
an enhanced program with an integrated text- 
editor, spreadsheet, file manager, and calculator 
for beginning computer users. Help screens are 
built-in, and the menu system uses icons, or 
picture-symbols, rather than words to convey the 
different functions (similar to Apple’s more com- 
plex business-oriented Lisa). 





MusiCalc I from Waveform Corporation turns a Commodore 
64 into a musical instrument. 


© Commodore 3-Plus-1—This integrated soft- 
ware package includes a word processor, file man- 
ager, spreadsheet, and business graphics. 
Through windowing, the word processor and the 
spreadsheet may be used simultaneously on the 
screen. 

© SuperScript 264—A multifunction word 
processor designed for both beginner and expert 
users, the package includes text editing, number 
calculations, mail-list functions, and a cut-and- 
paste feature for on-screen text editing. 

@ EasyCalc 64 and EasyCale 264—These are 
spreadsheet programs with color selection and 
graphics. Both packages are sold on cartridge, 
which Commodore says leaves more workspace 
in the computer than comparable disk-based 
spreadsheets. 

© Commodore B/Graph—A business graphics 
and statistics package, B/Graph computes and 
converts financial and statistical results into three- 
dimensional color charts, graphs, pie charts, 
histograms, and other graphics. 

© Financial Advisor—A financial aid program, 
Financial Advisor computes loan, mortgage, and 
investment formulas, and is available on cartridge. 

© Teligraphics—This is videotext and graphics 
software for use with Commodore telecommuni- 
cations modems. It allows transmission of pic- 
tures, text, and business graphics over the tele- 
phone and between computers. The package also 
allows users to upload and download data through 
telecomputing services such as CompuServe. 
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Commodore 64” 
Owners, Relax... 


ed MAY ire-texe ni software 








1 mastered the art of uncomplicating 
‘software. buy—w fiélp you wile svpevtolal 
Mines x Concepts pecee will meet your need. No guesswork! 
With y your purchase comes a menu-driven program ranked 

by independent evaluators nationwide as among the finest 
available. Relax as you learn how to operate your program 
with clear, concise tutorials written by professional writers... 
not programmers. For consultation on your special questions, 
technical support personnel are standing by on a toll-free basis. 








DATABASE MANAGER, $89.95 
* 100% Machine Language ® Free Form Design ® Sort On Any Field * Calculated Fields 
For Broch 5 * Interfaces to W.P. * Record Size = 2,000 Characters 
or Brochures, Support 
and Information, Call... ADVANCED REPORT GENERATOR, $49.95 
(100) 641-1441 * Companion to Database * Totals and Subtotals # Field Matching * Expanded Reports 
In California, Call... * Sorting (Up & Down) # Calculated Fields 
(800) 641-1442 WORD PROCESSOR, Professional Version $89.95 
* 80 Col w/o Addt'l Hdwr # 100% Machine Language * Spelling Checker (30,000 Words) 
* Over 70 Single Keystroke Commands * Printer Command File * Interfaces to Database 
WORD PROCESSOR, Personal Version $39.95 
* 100% Machine Language * True Word Wrap ¢ Printed page/line/character counters 
© Right Justify, Center © Printer Command File © Interfaces to Database 


MiRAGe CONCEPTS, iNc. 


2519 W. Shaw Ave., #106 ¢ Fresno, CA 93711 
TM—Commodore 64 is a Registered Trade Mark of Commodore Electronics, Ltd. 





Commodore announced its intention to pro- 
vide 100 different application templates for its 
Manager 64 data base system used by the Commo- 
dore 64. The templates will include five to ten 
specific applications per disk which, when used 
with Manager 64, will allow the user to computerize 
home budgets, index recipes, keep track of sports 
statistics, track business accounts, and carry out 
other functions. 


Ainong the other software packages announced 
at CES by Commodore are: 

© Ten new educational software products, 
including the Milliken Edufun (VIC-20 and Com- 
modore 64) series, the Kinder Koncepts (Commo- 
dore 64) series, and two new programs featuring 
the animated “Commodore Kids,” Math Facts and 
Numbers Galore. 

© Commodore Logo programming language for 
the 64 and 264 computers, with 170K of available 
disk storage. 

© International Soccer, the first in a series of 
advanced games with three-dimensional color 
animation which Commodore is calling the Gold 
Medallion games. Suggested retail price is $34.95, 
and the game should be available by the time you 
read this. 

© Other entertainment programs introduced 
include Viduzzles, a series of video puzzles for 
children; Jack Attack, an animated strategy game; 
and Solar Fox, a converted Bally Midway adventure 
game. Initial deliveries are scheduled for this 
spring. 

© Four new “talking” software products for 
use with Commodore's new Magic Voice speech 
module in the 64 and 264 computers. Two of the 
programs are Bally Midway games—Gorf and 
Wizard of Wor—and two are alphabet and number 
educational packages for young children—A Bee 
C’s and Counting Bee. Prices for the games should 
be in the $30-$40 range, Commodore announced. 

© Micro Illustrator for the Commodore 64 and 
264 computers, a popular “‘paint’”’ system for cre- 
ation of color graphics. The package uses a menu 
of icons and either a joystick or light pen. The 
Commodore 64 version will use all 16 of its colors 
and was scheduled for February release, while 
the 264 version will have a range of 128 colors and 
is set for an April release. 

© Micro Cookbook for the Commodore 64, a 
household management program providing cook- 
book and recipe management. Features include 
meal planning (plus help with leftovers), a glos- 
sary of cooking terms, calorie and nutritional in- 
formation, and 155 recipes with space for 100 
more. Initial sales were scheduled for early Feb- 
ruary at under $40 each. 

© Silent Butler, a record-keeping and financial 
management package on disk, which is designed 
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to require little or no instructions, setup process, 
or previous computer experience. The program 
will manage personal finances and records, bal- 
ance checkbooks, pay bills, provide a tax sum- 
mary, and serve as an appointment or special 
date reminder. The Silent Butler comes with a plas- 
tic form with pockets in which the user can place 
personal checks for printing on a 1525, 1526, or 
MPS-801 printer. 


Miidependent companies continue to develop and 
market a growing number of hardware and software 
products for the Commodore microcomputers. 

Chalk Board, Inc., developer of the PowerPad 
touch tablet, announced six new software pack- 
ages scheduled for release in the first quarter of 
1984. They include Leo's ‘Lectric Graphics, a 
graphics system which allows users to do finger 
painting, multiple-contact drawing, ora fine, 
point-to-point drawing; Leonardo's Logo, a turtle 
graphics program which employs push-button 
symbolic graphics in place of keyboard entry; 
Leonardo's Philharmonic, a music composition pack- 
age; Boolean Blueprints, an advanced BASIC tutor 
for the novice; Runway, an aircraft navigation and 
piloting simulation program based on geometric 
principles; and Borderline, an international rela- 
tions simulation game. 

AtariSoft, the third-party software publishing 
division of Atari, announced conversions of seven 
hit arcade titles for the Commodore 64 and VIC-20. 
The games are Joust, Battlezone, Pole Position, Ms. 
Pac-Man, Moon Patrol, Galaxian, and Jungle Hunt. 
Suggested prices for each game are $34.95 on disk 
and $44.95 on cartridge. 

Waveform Corp. introduced MusiCalc I, a 
software package designed to transform the Com- 
modore 64 into a three-voice synthesizer with 
realtime sequencing, slide controls, modulators, 
and transposers. The program allows users to 
play along with preprogrammed melodies, or 
create and store their own melodies for later 
playback. The suggested price is $74.95. 


Bisderbuna Software has converted its popular 
word processing program, Bank Street Writer, to 
disk format for the Commodore 64. Previously 
available for Apple and Atari computers, Bank 
Street Writer displays all functions and commands 
at the top of the screen in order to eliminate the 
need for memorizing codes or command words. 
Suggested retail price is $69.95. 

Human Engineered Software (HesWare), the 
largest single-source supplier of software for the 
Commodore 64, announced seven new educa- 
tional and productivity programs for the 64. Turtle 
Toyland Jr., produced for HesWare by ChildWare 
Corporation of Menlo Park, California, operates 























Here's a series of seven 
easy-to-use Manage- 
ment Information Re- 
ports flexibly designed to 
accommodate all small 
and medium size busi- 
ness accounting require- 
ments for Commodore 64* 
computers. 

Inventory Management / 
Sales Analysis Management / 
Accounts Receivable Manage- 
ment and Invoicing / Accounts Payable 
Management and Checkwriting / Payroll 
Management / Cash Flow Management / 
General Ledger 
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General Overview 


Each system includes: 

AMenu-driven program, sophisticated enough 
to provide complete Management and Product 
information, yet requires no prior computer or 
accounting knowledge to operate. 

A unique method of creating your own, un- 
limited array of reports — easily and quickly. 
YOU select the information you want, and YOU 
determine the sequence of the report column 
headings. 

Aprogram which can be used by itself (stand- 
alone), or can be interfaced, one at a time, with 





WHO'S GOT 7 NEW BUSINESS SYSTEMS 


other TIMEWORKS MANAGE- 
MENT INFORMATION pro- 
grams into a fully integrated 
accounting system. 

A Manual written in easy-to- 
understand, people-friendly 
English, abundantly illustrated 
to provide further clarity 
and eliminate guesswork. 
Password Protection, to 
prevent unauthorized ac- 
cess to confidential data, 

Suggested Retail List at 
$59.95 each. 


Customer Support Plan 

Timeworks Telephone Con- 
sulting Service is available to 
all users at no charge to support your installation 
and ongoing operations, 

For further details, contact your local Dealer 
or Timeworks, Inc. Choose from a host of 
Commodore 64 programs. Now at your favorite 
dealer. Or, contact Timeworks, RO. Box 321, 
Deerfield, IL 60015. 312-291-9200. 








SOFTWARE WITH SUBSTANCE 
— FOR EVERYONE. 


“Registered Trademark of Commodore Computer Systems. ¢ 1963 Timeworks, Inc. All rights reserved. 


with a joystick and teaches turtle graphics and 
programming concepts to children. HesWare also 
announced three new educational titles from Sun- 
burst Software—Factory, for those eight years or 
older, places the user in the role of a design en- 
gineer who must create geometric products on an 
assembly line; M-ss-ng L-nks, ages ten and above, 
is a language puzzle designed to improve spelling, 
grammar, comprehension skills, and writing; and 
Tri-Math, ages 6-12 years, uses an alien space 
intruder, a dinosaur, and a mysterious mansion 
as a part of a math skills program. 

Creative Software, of Sunnyvale, California, 
introduced seven software programs for the 
Commodore 64. Three of them—Joe’s Writer, Fred's 
Filer, and Jack's Cale—are components of an inte- 
grated personal productivity series the company 
calls the People’s Choice. Designed for older chil- 
dren and adults, the series features a word proc- 
essor, a file manager, and a spreadsheet. Each 
program will be sold separately at a suggested 
price of $49.95. 

Also introduced by Creative Software were 
Crisis Mountain, an action game on cartridge; In 
The Chips (see a review of this game elsewhere in 
this issue), a popular VIC-20 program now avail- 
able on cartridge for the 64, that teaches the player 
the economics of business by pitting him against 
a rival computer software company; I Am The C-64, 
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two three-program disks (sold separately) that 
teach the user about 64 programming, graphics, 
and sound; and Bumblebee, an educational 
cartridge-based program for children six years 
and older, which introduces the concepts of com- 
puter programming, Each of the programs sells 
for $34.95. 

Program Design, Inc. (PDI), of Greenwich, 
Connecticut, announced the availability of ten 
new program translations for the Commodore 64. 
The programs include Analogies, Vocabulary Builder 
1and 2, Reading Comprehension: What's Different?, 
Preschool 1Q Builder 1, Memory Builder: Concentra- 
tion, Story Builder/Word Master, Code Breaker, 
Number Series, and Shaft Raider. 

PDI President John Victor no doubt spoke for 
quite a few software firms when he stated, “We 
have decided to translate many of our titles into 
the Commodore 64 format...based on its growing 
popularity in the marketplace.” 

Victor’s comment is a good indication of what 
Commodore 64 owners and, toa slightly lesser 
degree, VIC-20 users will be finding during 1984— 
improved and more plentiful software in all areas 
of computing. The Winter CES not only intro- 
duced a new line of Commodore computers, it 
revealed more clearly that the company’s growing 
installed base of 64s and VIC-20s is fertile ground 
for software producers. @ 
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Dealers & Distributors 
Inquiries Invited 


Micro, 
WIALE «. 


1342 B Rt. 23 
Butler, N.J. 07405 





We write your letters. Invitations. 
Resumes, Announcements 
Applications, Greetings. And many 
more. 100 letters just waiting for 
youto fillin a few simple details, and 
PRINT! Select a letter and load 
it into your favorite word processor 
you don't have one, use our simple 
to operate Better Writer™ 
supplied with the package 


Thank You Letter 


Supports most word processors using your computer ASCII format.” $34.95 on disk for Commodore 
64 and Atari (16K) computers. Soon for Apple, IBM and Coleco computers. 


By Stephanie Neuman, Ph.D. 

We decorate your home. Or your office, We teach you about colors, furniture 
layout, and even the theory behind it, Then, by following simple instructions you 
select carpeting, paint walls, move heavy sofa beds — and you get to see it 
BEFORE you make costly mistakes. Amazing! 


‘$34.95 on disk for Commodore 64. Soon for Atari, Apple, IBM and Coleco computers 


We turn your disk drive into a powerful, simple to use machine! No more lengthy 
Basic commands... . call the menu anytime, your program in memory remains 
intact until you Load or Run another. Indispensable tool for every drive owner, 


$24.95 on disk for Commodore 64 and VIC 20 computers. 


We give you even more! All Ez/Disk 
functions, PLUS: copy disks with 
one or two drives, print files directly 
from disk, and more. 





Menu 3 


‘$34.95 on disk for Commodore 64. 





We teach you typing. Step by step, 
Easy to follow lessons even kids 
will love. And then, we make you 
type FAST. You actually watch 
your speed increase with every 
Grill! 





nad ULL 
‘ee i 


HASBBHHHH00 


HVeHvHeHGo0 
(o)ofo}ojajola[a}ate)e}) 
S@eHa0900e0008 

[mene 





Lesson 1 


$22.95 cassette, $24.95 on disk for Commodore 64 and Atari (16K) computers. Soon for Appia, IBM 


and Coleco computers. 


We save you time, All you need is 
immediately at your fingertips. No 
more endless paging through 
manuals and books, Basic 
command, memory locations and 
maps, sprites, sound and more. 


{$8.95 for Commodore 64 and VIC 20 computers. 








SoftiLay 64 


ASK FOR THESE SOFTRON PRODUCTS AT YOUR FAVORITE COMPUTER STORE OR, DIRECTLY FROM US: 
150 Nassau Street * Suite 2024 » New York = New York 10038 = Telephone: (212) 608-2922 = Orders Only: (800) 237-8400/Ext. 111 
Dealer and Distributor Inquiries Invited 


WE MAKE YOUR LIFE EASIER. 


Send check or money order plus $2.00 to cover shipping costs. Add $3.00 for COD. New York residents add 8.25% sales tax. 


Commodore 64, VIC 20, Apple, Atari, IBM and Coleco are trademarks of Commordore Electronics, LTD., Apple Computer, inc., Atari, Inc., IBM Corp. and Coleco respectively, SOFTRON, Better Letter Writer, 
Bettor Writer, Home Decorator, Quick Touch Typing, Ez/Disk, EziDisc Plus and Keyboard Sot/Lay are trademarks of SOFTRON, Inc. 


© 1984 Sotron Inc, Al Rights Reserved 


Robots: 


The New Mobile 
Computers 


Selby Bateman, Assistant Editor, Features 


The robot, one of the most popular of science 
fiction subjects, is now appearing on store 
shelves as a personal, programmable micro- 
computer on wheels. Although personal robots 
haven’t achieved the mass popularity of home 
computers, they are finding an eager audience 
as a combination computer toy and tinkerer’s 
playground. 


B.O.B., Jenus, HERO I, RB5X, Shakey, Freddy, 
Epistle, Topo, F.R.E.D. 


he names aren’t as famous as the fictional 

R2D2 or C3PO, yet these are the real 

pioneers that later generations of robots 

may someday view as venerable ancestors. 
They are contributing to what one American com- 
pany now calls the Age of Robotics. 


Several new robots are being introduced this 
spring and others that were marketed in 1983 are 
also available, with prices ranging from about 
$350 up to $5000. 

This generation of personal robots can speak, 
sing, deliver messages or trays of hors d'oeuvres, 
wake you up in the morning, answer phone calls, 
and play games—all under strictly limited condi- 
tions. Their shapes are closer to fire hydrants on 
wheels than to humans, but manufacturers are 
working to make them, as one industry leader 
says, “charming.” 

This year may well be remembered as the 
one in which personal robots first began to capture 
the public’s fancy. 
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Itis no coincidence that the first International 
Personal Robot Congress (IPRC) is set for this 
year. Between 3000 and 5000 people are expected 
to attend the three-day event, April 13-15 in 
Albuquerque. A potpourri of commercial exhibits, 
seminars, amateur robotics competitions, demon- 
strations, and lectures by leading robotics experts 
is planned. And the first Golden Droid Awards will 
be presented to the best amateur robot builders in 
several categories. 

The idea for the IPRC began with Joseph 
Bosworth, president of RB Robot Corporation in 
Golden, Colorado. RB Robot, maker of the RB5X 
personal robot, is one of the three major personal 
robot companies in the U.S. The other two are 
Androbot, Inc., of San Jose, California, producer 
of Topo, B.O.B., and a couple of other robots; 
and the Heath Company of Benton Harbor, Michi- 
gan, creator of the HERO I robot. 

Bosworth talked over his idea for the congress 
with executives from Androbot and Heath. He 
found them interested. ‘In keeping with what all 
three of these companies are doing in pioneering 
the industry, there really needed to be some kind 
of industry kickoff,” says Bosworth. “It’s exciting 
and it’s been a lot of fun to plan. Albuquerque is 
going to be one crazy town that weekend.” 

Appropriately, the keynote speaker for the 
event will be Isaac Asimov, whose prolific literary 
output has included three novels and more than 
two dozen stories with robots as central figures. 

Asimov essentially redefined the way science 
fiction writers portrayed robots. His fictional 
robots are machines of intelligence and rational 
thought, programmed to follow Asimov's classic 
Three Laws of Robotics: 





LAST NIGHT, COMPUSERVE TURNED THIS 
COMPUTER INTO A TRAVEL AGENT FOR JENNIE, 
A STOCK ANALYST FOR RALPH, AND Now, 
IT’S SENDING HERBIE TO ANOTHER GALAXY. 


NO MATTER WHICH COMPUTER 
YOU OWN, WE'LL HELP YOU GET 
THE MOST OUT OF IT. 


If you've got places to go, 
CompuServe can save you time and 
money getting there. Just access the 
Official Airline Guide Electronic 
Edition—for current flight schedules and 
fares. Make reservations through our 
on-line travel service. Even charter 


a yacht through “Worldwide Exchange.” 


If your money's in the market, 
CompuServe offers a wealth of 


prestigious financial data bases. 
Access Value Line, or Standard and 
Poor's. Get the latest information on 
40,000 stocks, bonds or commodities. 
Then, consult experts like IDS 

or Heinold Commodities. All on line 
with CompuServe. 

Or if, like Herbie, intergalactic 
gamesmanship is your thing, enjoy the 
best in fantasy, adventure, and space 
games. Like MegaWars, the ultimate 
computer conflict. 

To get all this and more, you'll 


need a computer, a modem and 
CompuServe. CompuServe connects with 
almost any personal computer, terminal, 
or communicating word processor. 

To receive an illustrated guide to 
CompuServe and learn how you can 
subscribe, contact or call: 


CompuServe 


Consumer Information Service, P.O. Box 20212 
5000 Arlington Centre Bivd., Columbus, OH 43220 


800-848-81 
In Ohio call 614-457-0802 


‘An H&R Block Company 








Write for a FREE catalog and Elite Club 
J istormation y 
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1. A robot may not injure a human being, or 
through inaction, allow a human being to come to 
harm. 

2. A robot must obey the orders given it by 
human beings except where such orders would 
conflict with the First Law. 

3. A robot must protect its own existence 
except where such protection would conflict with 
the First or Second Law. 





Androbot's Topo, a three-foot-tall computer-peripheral robot, 
will be available this year for Commodore, Apple, and IBM 
computers. Base price is $1595. 


P. putar interest in robots has not been limited 
to our own time. History is full of examples of 
our fascination with automatons, the precursors 
of robots which could move by themselves and 
be directed to perform predetermined motions. 
The ancient Egyptians constructed complicated 
water clocks. The Greeks and the Chinese built 
water-driven figures which performed a variety 
of movements. 

One of the most famous automatons, The 
Scribe, was created in the eighteenth century by 
Swiss craftsmen. This lifelike figure of a child 
seated at a drawing table writes with a quill pen 
and dips the pen into an ink well. Even the doll’s 
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eyes are animated; they follow the pen as it moves 
across a sheet of paper. The mechanism that drives 
The Scribe, and a similar automaton called The 
Draughtsman, is an intricate clocklike machine 
with a complex series of disks, springs, and cams. 
Both of these early robotic forms are still func- 
tional. (Mary Shelley reportedly visited an exhibit 
of these renowned automatons just a year before 
her book, Frankenstein, appeared.) 

The word robot comes from the Czech word 
for worker, robota (or the closely allied word, 
robotit, meaning ‘‘to drudge’’). It was first used in 
a 1921 play by Karel Capek, R.U.R. (Rossum's Uni- 
versal Robots), in which robots destroy the human 
race. It was this negative view of robots as soulless 
machines bent on destroying their makers from 
which Asimov departed. 

Since Capek, science fiction writers by the 
hundreds have vested robots with a wide variety 
of abilities and personality traits. Movies have 
given usa clear, if fantastic, image of robots, rang- 
ing from the evil human impersonator in Fritz 
Lang’s Metropolis (1926) to the droids in George 
Lucas’s Star Wars trilogy, which possess the full 
range of human characteristics. 


Write science fiction has aided us in visualizing 
what we want in a personal robot, industrial ro- 
botics research has provided much of the 
hardware development. American industry uses 
robots in auto assembly lines, oil drilling opera- 
tions, coal mines, and hundreds of other places. 
There are robotic mail carriers that roll through 
corporate offices, automated tractors that deliver 
and pick up parts, and welding machines that 
exhibit tireless accuracy. Robots tend machines, 
paint, handle parts, and inspect assembly of 
products. 

Approximately 7000 industrial robots operate 
in the United States, about 9000 in Europe, and 
Japan may have as many as 30,000. The Japanese 
have made robot development a national goal, 
with full government backing and a multimillion 
dollar investment. 

The Robot Institute of America, an industry 
support association with 255 corporate members, 
estimates that by 1991 there will be more than 
100,000 robots installed and operating in U.S. 
plants. Joseph Engelberger, considered the father 
of robotics, says that within ten years the robot 
industry will be a $3 billion a year enterprise. 

This June the largest industrial robotics show 
of its kind, Robots 8, is expected to draw more 
than 20,000 people to Detroit. Another industry 
support group, Robotics International of the 
Society of Manufacturing Engineers, has a mem- 
bership of more than 10,000 engineers, educators, 
and consultants. It is planning a conference and 
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Printer Interface 


The Revolutionary Printer Interface for the Commodore G4™ 


A New Erain 
Commodore Printing Power. 


Grappler CD offers the first complete answer to 
your printer interfacing requirements, with many 
powerful capabilities unique in the Commodore 
marketplace. Complete signal translation allows 
many popular name brand printers to operate 
perfectly with the Commodore 64, or to imitate 
Commodore's own printer. Even Commodore's 
graphic character set can be reproduced on 
Epson, Okidata, Star, ProWriter and other popular 
printers. 

Exclusive Grappler CD features provide a variety 
of graphic screen dumps, text screen dumps and 
formatting. No other Commodore interface can 
Offer this. 

If you own a Commodore 64... 


If you're serious about quality, trouble free 
printing... You need the Grappler CD. 


Contact your nearest Commodore dealer or call 
Orange Micro for a dealer near you. 


Commodore 64 and Commogore 1525 are trademarks of Commocore Electonics Limted 
Epson is a registered wrademars of Epson America nc 


A Uniquely Intelligent Interface: 

* Prints Screen Graphics Without Software 

* Graphics Screen Dump Routines Include 
Rotated, Inversed, Enhanced and Double Sized: 
Graphics. 

* Full Code Translation From Commodore’s PET 
ASCIl to Standard ASCIl, the Language of Most 
Printers. 

* Complete Emulation of the Commodore 1525 
Printer for printing of Commodore's Special 
Characters. 

* Dip Switch Printer Selection for Epson, Star, 
Okidata, ProWriter and other popular printers. 

* Conversion Mode for Easy Reading of Special 
Commodore Codes. 

* Text Screen Dump and Formatting Commands 

© 22 Unique Text and Graphics Commands 
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1400 N. LAKEVIEW AVE., ANAHEIM, CA 92807 U.S.A 
(714) 779-2772 TELEX: 183511CSMA 


© Orange Micro, inc, 1989 


trade show, Robots West, for next November in 
Anaheim, California, that may attract as many as 
15,000 participants. 

1984’s robots are a far cry from the multi- 
talented, two-legged science fiction versions. Yet, 
robotics technology has come a long way ina very 
short time. It has been the computer, with its tiny 
chips and integrated circuits, that has made those 
gains possible. 
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F.R.E.D, (Friendly Robotic Educational Device), a 12-inch, 
$349 robot that speaks, moves, and draws, and can be directed 
by an infrared signal from the remote control device at right. 





During the late 1960s, scientists at Stanford 
Research Institute (SRI) International created a 
forerunner of the present group of personal 
robots. It was aptly named Shakey. Mounted on 
the robot were an arm, a television camera, and 
grippers. Shakey was programmed to roll around 
in a small, five-room environment, shifting and 
stacking boxes on command. 

In the 1970s, a robot named Freddy was de- 
veloped at Edinburgh University. Freddy was a 
large suspended arm with a gripper, similar in 
form to some assembly-line industrial robots of 
today. Freddy's job was to choose appropriate 
parts from a pile in order to make toys. 

These and other early experiments in robotics 
demonstrated to engineers the enormous com- 
plexity involved in creating robots which could 
make decisions in even the simplest fashion. How 
could someone tell Shakey all of the possible deci- 
sions to be made in finding a particular box and 
moving it next to another box? And what if neither 
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box was in the room occupied by Shakey? The 
computer program which drove Shakey had to 
work out each step of the desired action from a 
limited number of movements at its disposal. The 
number of Shakey’s potential decisions quickly 
produced a mathematical explosion of options. 

Freddy's job was no easier. The robot had to 
be shown each step of a successful operation and 
then it repeated the process. If its limited sensing 
mechanism couldn't find the correct shape of a 
toy part from the pile of parts at its disposal, it 
would pick through the pile. But if stymied, 
Freddy would smash its arm into the pile of parts, 
trying to break them into something it could 
recognize. 


Robots are getting smarter, however. Jenus, a 
robot created by Robotics International Corpora- 
tion, rolls under its own power. When its batteries 
weaken, it locates an electrical outlet and plugs 
in. IBM is reportedly working on a robot called 
Epistle that will read the mail and then pick out 
the more important letters by looking for certain 
phrases or words previously embedded in its 
memory. 

Robotics pioneer David Heiserman, a con- 
sultant and author of How To Design and Build 
Your Own Custom Robot and four other books on 
robotics, believes there are many people who 
want robots but can’t justify the expense. Unlike 
the microcomputer, a robot cannot yet be called a 
utility item for the home of the individual. 

“I'm very optimistic about how it’s going to 
turn out,” says Heiserman. “But the people who 
are manufacturing these commercial hobby robots 
will go through a difficult period. They have to 
put a lot of money into product development and 
support for the robot without any return for a 
while.” 

That's not the view that the manufacturers 
are taking. Rick Gibson, marketing manager for 
Androbot, says that initial response to the com- 
pany’s product has been overwhelming. He be- 
lieves that sales of robots in 1984 will be brisk 
among dedicated computer hackers and hobbyists. 

The real challenge for Androbot and other 
robot producers will follow this first burst of en- 
thusiasm among those already fascinated with 
robotics. “Right now we're trying to increase the 
robots’ capabilities so that after the initial market 
of instantly interested people is satisfied, we'll 
have robots that are more productive and can do 
some things,” says Gibson. “By the end of 1984, 
we'll be able to offer the options that will interest 
the next phase of the marketplace.” 


Anarobot introduced a prototype version of its 
robot, Topo, in the spring of 1983. The 33-pound, 
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GAZETTE. When you subscribe to COM- 
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receive a fully tested 54-inch floppy disk 
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issue of COMPUTE!’s GAZETTE Disk will con- 
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© Props — a fast paced, nonviolent 
game for the Commodore 64. Ani- 
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game puts you in control of a pigeon 
lost in a dangerous sky filled with 
whirling propellers. Your goal is to 
make it across the sky to find your 
skittish mate, who moves unpredict- 
ably from coop to coop. 

© SuperSprite — an unsteady flyer de- 
pends on you to guide him down 
through a series of unfriendly kryp- 
tonite barriers. For the Commodore 
64, SuperSprite makes effective use of 
sprite animation and sound. 

@ PRINT Sound — a utility for the VIC- 
20 which translates letters into musi- 
cal notes. All you supply is a simple 
PRINT statement. 

© Sound Story— an exciting demonstra- 
tion program that illustrates the 
sound capabilities of the VIC-20. A 
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three-foot-tall robot was a 
wheeled computer peripheral 
that could be programmed 
through the keyboard of a 
microcomputer. All 650 of the 
prototypes sold at a price of 
$495 each. 

At the Comdex show in 
Las Vegas last November, 
Androbot introduced a new 
digital Topo. Although it shares 
the name and physical appear- 
ance of the earlier prototype, 
the new Topo is a much more 
sophisticated robot. Topo can 


2 = * 
be programmed to talk in two 
different ways. It has a text- : ae 
speech capability that allows ms . . 


the user to type in what to say, — Androman, a 12-inch-tall computer-peripheral robot that plays games. 
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Major advances have been made in the 
sophistication and adaptability of robots. 
There are significant problem areas, however. 


Discriminating Vision: A robot's visual sen- 
sor is usually a television camera. The camera 
translates what it sees into picture elements 
(pixels). Each of the many pixels is then given 
a numerical value based on the varying levels 
of light. The number patterns are analyzed 
by the computer, which matches these pat- 
terns to corresponding values previously 
embedded in memory. In this way, for ex- 
ample, a robot can find a particular item it 
has been programmed to seek, such as parts 
of a machine it is building. 

In the past, a computer's ability to proc- 
ess visual images has been relatively un- 
sophisticated and slow. Scientists are now 
working to perfect a pattern-finding function 
which will allow the computer to discriminate 
swiftly among images and even to add new 
information to its visual senses. 

Bipedal Locomotion: Do you want your robot 
to climb stairs, go up a ladder, or step over a 
curb? That's not yet possible. Why do you 
think most robots roll along like R2D2 rather 
than walk as does C3PO? Even a toddler can 
outwalk a robot. But that will change. 

Robotics engineers at places like Carnegie- 
Mellon’s Robotics Institute are making great 
strides in this area of research. There are 
already prototypes that walk with the multi- 
legged style of a spider and that bounce from 








Obstacles In Robot Development 


place to place like a pogo stick. 


An Adaptable Hand: Robotic hands are de- 
veloped to the point that they can hold almost 
anything a human hand can. What hasn’t 
been perfected is a robot’s hand with the 
adaptability of our four fingers and opposable 
thumb. For a robot to hold a paint sprayer 
takes one type of gripper. The same robot 
needs a different mechanism to hold a can. 
And yet a third robotic hand might be re- 
quired to grasp a vacuum cleaner nozzle. 


A Natural Language: To communicate with 
your Commodore 64 or VIC-20 requires a 
language such as BASIC, which will translate 
human ideas into numbers the computer can 
understand. But there are tremendous prob- 
lems involved in telling a robot to carry out 
what may appear at first to be even the 
simplest function. Computer-driven robots 
cannot become popular and useful until there 
is a way for humans to communicate with 
them without having to learn a complex 
programming language. 

This is a central concern of artificial in- 
telligence research (Al), one of the most in- 
triguing and controversial aspects of com- 
puter science and robotics. For over 25 years 
AI researchers have worked to improve the 
way in which humans communicate with 
computers. LISP (List Processing), SHRDLU, 
and other experimental natural languages 
have been developed to help solve this fun- 
damental problem. The search continues. 
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press the return key, and have Topo speak. The 
other method is a phoneme system that allows 
Topo to sing, to speak in foreign languages, and 
to make sound effects. This second form allows 
the user to control the pitch, speed, and volume 
of Topo’s voice. 

The base price for the new Topo is $1595, The 
robot is controlled by an infrared link housed ina 
transceiver (base communicator) that plugs into 
an Apple computer. During the second half of 
1984, Androbot has plans to introduce a Topo 
version for Commodore and IBM PC computers. 





Heath's HERO I robot, a programmable computer on wheels 
that sells for a base price of $2500 assembled ($1500 in full 
kit form). 


Topo can move at a speed of about two feet 
per second, contains three 8031 microprocessors 
(two on-board and one in the base communicator), 
and has eight card slots (two already in use for 
motion control and communication/speech con- 
trol). Also available are a number of educational 
and instructional software programs and an at- 
tachable Androwagon that carries up to 20 
‘pounds. Topo is upgradable and takes commands 
from the keyboard or through a joystick. 

Androbot, a company established by Atari 
founder Nolan Bushnell, is currently introducing 
two more personal robots. B.O.B. (brains-on- 
board), as its name implies, is the most sophisti- 
cated of the robots being created by the company. 
In addition to its two Intel 8086 microprocessors, 
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B.O.B. has three megabytes of memory. It can be 
programmed to navigate through an area, re- 
member those patterns, speak, and choose from 
over 100 stored words and phrases. 

“Initially B.O.B. will be a robot for pro- 
grammers, hobbyists, and computer buffs,’”” says 
Rick Gibson. “Through additional software in the 
future, B.O.B. will develop into a highly sophisti- 
cated robot, ultimately evolving over the years 
into a personal servant. It has the equivalent 
capabilities of an IBM PC on-board, and programs 
can be written either on an IBM PC or an Apple II 
with a modem.” 

The base price for B.O.B. will be approxi- 
mately $2000. With accessories, the price can go 
as high as $5000. 

Androbot is also introducing F.R.E.D. 
(Friendly Robotic Educational Device). Aimed at 
the educational field, F.R.E.D. has an infrared 
controller which can be used to make it talk, move, 
or control a drawing pen mechanism. F.R.E.D. is 
12 inches high, weighs two and a half pounds, 
and costs $349. 

F.R.E.D. comes with a utility wagon and a 
pen activation arm that will accept future acces- 
sories. The robot has a 45-word vocabulary and is 
expandable. Androbot plans to make F.R.E.D. 
compatible with almost all personal computers, 
although the infrared controller means that the 
computer is not essential. Like the other robots, 
F.R.E.D. can detect a void around it and thus 
protect itself from rolling off the edge of a surface. 

Finally, Androbot has created Androman, a 
12-inch tall game robot for use with an Atari VCS 
2600 or VCS-compatible machines. This game 
robot comes with a joystick controller that works 
via a remote infrared signal, a game cartridge, a 
transmitter, a game-playing field, a set of game 
pieces imprinted with coded information, and an 
instruction manual. Play involves shifts between 
the computer monitor and the playing field. 


The HERO I (Heath Educational RObot) was 
introduced a little over a year ago by the Heath 
Company, which so far has sold several thousand 
of them at about $1500 in kit form and $2500 
factory-assembled. Without the optional arm and 
voice capability, the kit sells for about $1000. 

“It’s been an extremely good seller for us,”” 
says Douglas Bonham, director of Heathkit/Zenith 
Educational Systems. ‘The Heath robot incorpo- 
rates all of the basic systems found on modern 
industrial robots, plus a few that are still in the 
experimental stage of industrial application.” 

At 20 inches tall and 39 pounds, HERO I looks 
something like the robot R2D2 of Star Wars fame. 
The turret-like head rotates up to 350 degrees and 
carries an arm mechanism, programming 
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keyboard, and experimental circuit board. 

HERO I has its own on-board programmable 
computer and contains electronic sensors to detect 
light, sound, motion, and obstructions. The robot 
is advertised with Heath’s robotics education 
course, which reflects their goal to market HERO 
las an instructional tool. 

The unit uses a 6808 microprocessor, has a 
hexadecimal keyboard with multifunction keys, 
and includes a synthesized phoneme-based 
speech system that generates 64 different basic 
sounds to simulate human speech or sound effects. 


The RB5X, marketed by RB Robot Corporation, 
stands about 23 inches tall without the optional 

arm which can be mounted between the robot's 

dome and the body. Cartridge slots are included 
for later expansion. 

Optional add-ons include a 10-key number 
pad, a compass, and even a fire extinguisher 
nozzle. It is programmable in BASIC on any com- 
puter using the RS-232 interface. 

The unexpanded unit sells for $1795. An op- 
tional arm is priced at $595 and a voice capability 
is available for $195. 

“We think the personal robot industry will 
follow the kind of explosive growth that we've 
had over the past six years in the personal com- 
puter field,” says RB Robot’s Bosworth. ‘The 
horizon is more like 5 to 10 years and not 10 to 15 
years.” 

For the future, advances in robotics tech- 
nology will be affected by improvements in several 
crucial areas of research. Large-scale integration 
of computer systems will bring greater produc- 
tivity and adaptability to entire factories of robots. 
More sophisticated hierarchies in robot control 
systems will mean that sensory devices will be 
more effectively used. 

Artificial intelligence (AI) research, the at- 
tempt to simulate human thought processes and 
experiential learning in computers, may hold even 
greater solutions in the field of robotics. Some AI 
scientists envision that in the early years of the 
twenty-first century there will be few areas of 
human thought that computers will not be able to 
duplicate. 

Although the AI field is as controversial as it. 
is complex, it has already brought advances in 
computer languages, robotic sensory-control co- 
ordination, problem-solving structure, and a host 
of human thought-related subjects. 

Personal robots may not yet have all the ad- 
vanced abilities we popularly associate with 
robots. But the HEROs, B.O.B.s, and RB5Xs that 
may roll through your house this year are the first 
steps in making this science fiction staple a popu- 
lar, affordable science fact. 
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The RB5X, produced by RB Robot corporation, is a 23-inch- 
tall programmable robot, which can be plugged into a com- 
puter for instructions. Preprogrammed EPROM cartridges 
can also be used to direct the RB5X. 
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Programs for the Commodore 64 
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Operating System 
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How To Start 
A User Group 


Kathy Yakal, Editorial Assistant 


A user group is a good resource for program- 
ming tips, free software, and new ideas on 
how to use your computer. If you can’t find a 
group that meets near you, then why not start 
your own? Here are some suggestions. 
SS 


When the first Commodore PETs were imported 
into Canada about five years ago, Mike Bonny- 
castle bought one, He was looking for a micro 
that he could use in his business and hadn’t been 


pleased with other machines available at that time. 


“Up to then, there wasn’t a viable machine,” he 
says. ‘That 8K PET was about a hundred times 
better than I thought it would be.” 

But there were some things about the PET 
that Bonnycastle didn’t understand. He went 
back to the Commodore dealer. “I don’t know 
how to do that either,” the dealer said, “but you 
might try calling a guy named Jim Butterfield.” 

Bonnycastle looked up Butterfield in the 
Toronto phone book and called him. ‘““Why don’t 
you come over this afternoon?” Butterfield said. 
Bonnycastle arrived at the house and found 
another Commodore owner, Lyman Duggan, 
also waiting to talk to Butterfield. The three of 
them sat down and talked Commodore. As they 
parted, one of them said, “Why don’t we do this 
again sometime?” 

And that was the first meeting of TPUG, the 
Toronto PET User Group. 


Simple Beginnings 
Though they didn’t know it that Saturday after- 
noon, what those three men started would grow 
to. be one of the largest and most respected Com- 
modore user groups in the world. The single ele- 
ment that they had in common was a desire to 
learn more about the ins and outs of Commodore 
computers, and a willingness to share what they 
had learned with others. 

If you have wanted to start a user group but 
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hesitated because of the enormity of the task, it 
may be because you're looking at the huge groups 
that have evolved over months or years, like TPUG 
with more than 13,000 members. There are 
thousands of programs in its public domain soft- 
ware library and an annual convention in Toronto 
that attracts people from all over the world. A 
full-time staff runs the group’s office. 

Large, successful user groups don’t just 
materialize. Most of them start with a handful of 
individuals who want to learn more about an ex- 
citing hobby. 


‘I Wanted Company”’ 

Frank Topping bought a VIC-20 in December, 
1982. Retired, he lives in Englewood, Florida, a 
community of about 20,000 people. An amateur 
radio operator with several friends who owned 
computers, he looked around to see if there was a 
user group in the area. 

“T wanted company,” says Topping. ‘““Com- 
puting is lonesome without other computer hob- 
byists.”” Finding no established group close 
enough to join, he decided that, with a little initial 
organization on his part, the Commodore owners 
in Englewood could have their own group. 

Topping contacted the local media to see if 
he could get some publicity for the group’s or- 
ganizational meeting. Four newspapers wrote 
articles about his efforts, and the station manager 
of WENG-AM in Englewood interviewed him on 
the air one morning. 

“It was very successful,” says Topping. “I 
got lots of phone calls, and 14 people came to the 
organizational meeting at my home.” It soon be- 
came evident that Topping’s home wasn’t big 
enough for group meetings, so they contacted a 
local savings and loan who let them use a meeting 
room free of charge. “Bits & Bytes,” the Computer 
User Group of Englewood, Florida, that Frank 
Topping started, has more than tripled in size 
since that first meeting. 
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Should We? 


Publicity and an organizational meeting do not a 
user group make—unless there is sufficient inter- 
est. “The whole substance of our first meeting 
was asking the question, ‘Should we?’,” says 
Topping. 

Interest, a bit of organization, a place to meet, 
and at least one computer is all you really need to 
start a user group. There are no formal guidelines 
or requirements. Commodore appreciates its user 
groups, but places no restrictions on them. 

You may have actually started a user group 
without knowing it. Do you get together with 
friends occasionally and try to figure out pro- 
gramming problems together? That's a user group. 
The only difference between your informal gather- 
ings and the Montgomery County Commodore 
Computer Society or the Eau Claire Commodore 
64 User Group is a little formality. 


Getting Formal 


So you and a friend have decided to start a group. 
You could follow Frank Topping’s example and 
try to get some media coverage. You can post 
signs at local computer stores, school bulletin 
boards, even laundromats and grocery stores. Or 
word of mouth may be sufficient. 

Try to have your first meeting at a public 
place, rather than someone’s home. You might be 
surprised at the turnout. Many groups have 
started in the back room of a computer store ora 
small school auditorium. 

You will want to set some kind of agenda for 
the first meeting, and select someone to serve as a 
temporary leader until officers are elected. Writing 
bylaws may take up the whole first meeting. 

There is no official set of Commodore user 
group bylaws. If the word bylaws is intimidating, 
call them rules, or your charter, or group 
guidelines. All you're doing is defining the group 
and how it will function. 

Your bylaws may contain a statement of pur- 
pose, a mission, a reason for the group’s existence. 
Something like, “This group exists for Commo- 
dore owners to assemble and share information 
about their computers.” 

You can decide if you want to elect officers— 
which you probably will—what their responsibili- 
ties will be, and how long they will stay in office. 

Dues is another issue. It may not seem neces- 
sary at first, but there are some things that might 
come up later that would cost money—room 
rental, postage for a newsletter, speakers, and 
refreshments, for example. Many user groups 
just starting out set yearly dues at between ten 
and twenty dollars. 

In addition, you might want to decide ona 
name for the group, meeting time and place, and 


42° COMPUTEI’s Gazette April 1984 


appoint or elect people to be in charge of publicity 
and refreshments. 

Your bylaws can contain whatever informa- 
tion you think is appropriate. Try to keep it flex- 
ible. The rules don’t have to be carved in stone, 
but a little organization at the group's beginning 
can save a lot of trouble and bad feelings later on. 


Getting Down To Business 

Now that that’s out of the way, you can get started 
on what you set out to do: share information about 
computing. 

But what information? Who teaches and who 
learns? You can find this out by having everyone 
at the first meeting, and new members as they 
come in, write down what they could do some 
kind of presentation about, and what things they 
would be most interested to learn. 

Your agenda coordinator or committee can 
use this information to plan each meeting. You 
might want to bring in special speakers from local 
computer stores or schools for certain topics, but 
you may have enough talent within your group 
to plan a whole year’s worth of meetings. 

Some groups falter at this point. If no one is 
comfortable enough with his or her computer 
knowledge to present something to the group, 
you could start by bringing in software and giving 
oral demonstrations and reviews. Or by having 
individuals study a tutorial in a book or magazine 
and explain it to the group. 

How you present information can be a prob- 
lem as your group grows. A group of ten can 
gather around a couple of computers for demon- 
strations. Seventy-five people may require some 
special equipment, like a large-screen video 
monitor. 

A word of encouragement: If you hesitate to 
join a small group because you just bought a VIC- 
20 and can’t get through the first chapter in the 
manual, don’t worry. Computer hobbyists love to 
share what they've learned. So what if you can’t 
explain string variables? Offer to bring oatmeal 
crunchies and a pound of coffee to the meeting. 


Growing Up 


If you live in a small town miles from a major 
metropolitan area, meeting once a month and 
sharing new information may be sufficient to meet 
everyone’s needs. But many groups that have 
grown to tens or hundreds of members find that 
they want more than that. Here are some examples. 

A Newsletter, This can be a one-page mimeo- 
graphed sheet with notes from the last meeting 
and announcements for the next. Some groups 
have enough members and resources to put out a 
monthly magazine with advertisements, pro- 
grams, reviews of new software and hardware, 
and programming tips. 


FCM: The Filing, Cataloging 
and Mailing List Program 
that does everything. 











Well, almost. 


Resource Library. Thousands of public domain 
programs are available through individuals, other 
user groups, bulletin boards, and Commodore 
itself. You can appoint a librarian to take charge 
of this, someone who will copy disks for group 
members. People could bring new disks to the 
meeting and request copies, or the user group 
could purchase disks in bulk and charge a small 
fee for the disk and the librarian’s time. Remember 
that it is illegal to copy anything but public domain 
programs. 

Books and magazines may also be a part of 
this library, as well as newsletters from other user 
groups. Again, be aware of copyright laws. It is 
illegal to type in a program from a copyrighted 
publication that you have not purchased, just as 
it is to get a copy of such a program on tape or 
disk. By buying a computer book or magazine, 
you are buying the right to copy the software con- 
tained therein for your use only. 

Bulletin Board Systems. Most Commodore 
BBS’s were born out of user groups. They can be 
expensive to maintain and troublesome to keep 
running, but the shared information and new 
knowledge they can provide Commodore users is 
the reward. 

Subgroups. If there are enough members with 
special interests, you could break into subgroups 
for a portion of the meeting, or even hold sepa- 
rate meetings—a word processing workshop, 


struggling through machine language, or maybe 
just a VIC-20 and a Commodore 64 group meeting 
separately. 

Discounts. Buying certain items in bulk, such 
as blank diskettes, often greatly reduces individual 
cost. Also, local computer dealers and retailers 
are often willing to offer discounts to user group 
members. This benefits not only the group, but 
also increases business for the dealer. 


Only A Framework 

The suggestions presented here are just that: sug- 
gestions. Each of the hundreds of Commodore 
user groups around the world has its own unique 
history. Let yours evolve. Try to get as many 
people actively involved as you can. Everyone 
has something to bring to the group. 

If you really run into trouble with the logistics 
of getting a group off the ground, it might be 
worth a long-distance phone call to a successful 
user group to find out how they solved similar 
problems. 


And try not to get too bogged down in or- 
ganization. Once your group reaches a certain 
size, more of it will be necessary, but keep your 
purpose in mind. You're a group of Commodore 
users spending some time together to enhance 
your own computer knowledge and share what 











iu to leal 


‘matic Weather Station) com- 
bines a quality weather sensor 
with software to let you track 
weather conditions inside or 
outside your home. HAWS moni- 
tors weather data including dew 
point, temperature, humidity, 
and atmospheric pressure; plots 
historical data and graphically 
displays weather trends; deter- 
mines the comfort and chill fac- 
tors to help you dress; HAWS 
even forecasts the weather and 
compares your predictions to 
the local weatherman's, 

HAWS uses the same sensor 


Vic 20™ or eee 64™ 
This exciting, new we 
lo! 


you've learned with others. @ 


a a 





HAWS provides 


incoming data to monitor and 
forecast weather conditions, 
HAWS includes an instructive 
software program and a com- 
plete user's manual that teaches 
meteorological terms and equa- 
tions to allow anyone to quickly 
grasp weather concepts either at 
home or in the classroom. Sim- 
ple plug-in components and 










Ordering Information 
Send $199.95 in check or money order payable to 
Vaisala, Inc. Include name, address, telephone num- 
ber, your computer model (VIC 20 or Commodore 64), 
and program preference (tape cassette or floppy disc). 


Gx Or call toll free to place your order. 
Major credit cards accepted. 
1-800-227-3800 ext. HAWS 


Dealer inquiries invited. 
VIC 20 and Commodore 64 are trademarks of Commodore Electronics Ltd 


employed by weather services in 
60 countries worldwide. The 
HAWS package costs only 
$199.95 and includes the sensor, 
cassette or floppy disc program, 
15-foot cable with connector for 
the computer, and a complete 
user’s manual. 

Send today or call toll free to. 
order your HAWS package. 


easy hookup also means you 
can free up your computer at 
any time for other duties. HAWS 
is a great educational tool for 
anyone. Order today. 











VAISALA INC, 
2 TOWER OFFICE PARK 
WOBURN, MA 01801 








ONI SNOLLVINWIS DIDALWHIS 

















A Guide To 
Commodore User Groups 


Part 2 


Kathy Yakal, Editorial Assistant 


Here is the second half of the listof Commo- _—_ a user group, please enclose a self-addressed, 
dore user groups that began in last month’s stamped envelope. 
GAZETTE. If you are a new Commodore owner Additions, deletions, and corrections to this 
looking for some support and assistance, you _list should be addressed to: 
may want to attend a meeting in your area. COMPUTE! Publications 
P.O. Box 5406 
coca, Greensboro, NC 27403 
attn: Commodore User Groups 


If you send a written request for information from 














NEBRASKA ane aaEe Friendly User Group NEW YORK 
t into 
Greater Omaha Commodore 64 49 Hershey Rd. Adirondack Commodore 64 User 
User Group Wayne, Nf roup 
Bob Quisenberry 20) 3 Paul Klompas, c/o Ray Supply 
2932 Leawood Dr. Upper Glen St, PO. Box 743 
‘Omaha, NE 68123 Commodore-64 Users Group GER falls, NY 12801 
402/292-2753 Thomas Martin 
680 Lei ferrace ie 
Omaha VIC-20 User Group Westesed Ni 07675 Biearwond beyeuore Vi 
on se se 
. Raphael St. : ee 
Bellevue, NE 68005 Computer Club of Ocean County Breniivooul ne Cb econ 
402/292-3961 Flavio L. Komuves Bree yar? 
; 1170 Old Freehold Rd. Brentwood, 
The National VIC-20 User Group Toms River, NJ 08753 516/273-7883 
George E Kaywood 201/341-3797 
RO. Box 345; BBS 201/244-2259 Broome County C-64 Users Group 
Omaha, NE 68134 Richard Sher 
Northwest Bergen VIC Users 31-5 Jane Lacy Dr, 
Group Endicott, NY 10760 
Amold Wiesenfeld 607/754-7382 
NEW HAMPSHIRE pa yf ica i 
C-64 User Software Exchange 201/891-5196 Cee arcs Commodore Cl 
Resources (U.S.E.R.S.) Willian Pier 
Paul E. Kyle South Jersey Commodore WN 
RO, Box Ragen pies Uses Seouy ‘Albany, NY 12210 
fochester, 7 Mark Orthner Y 
eee NE ose 46B Monroe Path 518/436-1190 
Southern New Hampshire VIC-20 Maple Shade, NJ 08052 
User Club 6091667-9758 Commodore Computer Users 
Don Osterman Group of Ithaca 
PO. Box 7067 VIC Software Development Club Max Paperno. 
Nashua, NH 03060 H. B Rosenl SIDE, State St. 
603/888-0959 77 Fomalhaut Ave. Ithaca, NY 14850 
Sewell, NJ 08080 607/277-3981 
TBH VIC NICS See 
|. Newman tm 
PAE Thomas R. Molnar COMMODORE SIG Computer 
m, 46 Wayne S. Club of Rockland 
%3 Edison, NJ 08817 Peter Bellin 
Tallman, NY 
Tallman, NY 10982 
NEW MEXICO 8 
NEW JERSEY : eo esl 
New Mexico Commodore User 
ACGNJ PET/VIC/CBM User Group Commodore User Group of 
Group Danny or Betsy Byrne ‘ochester 
Joseph M. Pylka 6212 Karlson NE. Thomas A. Werenski 
30 Riverview Terrace 78 Hardison Rd. 


Belle Mead, NJ 08502 
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Reeae) NM87113 


Rochester, NY 14617 


come tax computing 
software specially designed for 
the Commodore VIC 20. 


Now you can use your Commodore 
VIC 20 to perform all the 

ations on your Canadian TL 
general tax form, Taxpack guides 
you easily through every aspect of 
the form with friendly prompts and 
a. comprehensive instruction 
manual. This new software is 
available on cassette tape and will 
run on the standard 3.5k memory 
in your Commodore VIC 20 home 
computer.” 

lets you tackle your income 
at your own pace, A 
-and-restore 
function lets you record and review 
historical results, Professional 
editing features assure easy and 

e data entry, Taxpack puts 
the power of tax modelling and 
planning for subsequent years in 
your hands, today, 


























"The cusstte also includes an expanda version of 
Taspuic with enhanced display features, forthe 
Gommoxdore VIC 30 with 8k: memory expansion, 










I designed Taxpack so 


you could do something 
really practical with your 
Commodore VIC 20. 


Peter Lambert, MBA 
Vice-President, 

Product Development 
Cosmopolitan Software 





y happy returns 
Because you can calculate and 
preview more tax scenarios with 
Taxpack than you'd have the 
patience or the time to do manually, 
this software can help you save tax 
dollars. Custom-tailored to the 
Canadian T1 general form, Taxpack 
will be updated every year to reflect 
changes in the government's income 
tax regulations. Innovative program 
design allows us to update Taxpack 
within days of the new TI's 

lity. 


























So easy to order 
To use your Visa or Mastercard, 
phone us toll free; or, send your 
cheque or money order with the 
handy mail-order form attached 
We'll confirm your order by return 
mail. Your up-to-date Taxpack 
cassette and manual will be shipped 
within 15 days of the release of the 
1983 TI general form. 









Satisfaction Guaranteed 

We guarantee that you will find 
Taxpack an excellent software value, 
If you are not totally satisfied, drop 
tus a note to say why, and return the 
product post paid to us within 10 
days for a full refund of the 
purchase price, 





To onder with Vise or Mastercard =. 
call us toll-free: 


1-800-268-6364 
(from B.C., call 112-800-268-6364) 


1 Wane Taxpack! 
Please send me ~ 





__Taxpacks @ $29.95 $ 




















Nova Scotia residents only, add 10% Sales Ta $$ 
Add $2 per unit shipping and handliny +§ 

$. 
My Name 
‘Address 
City a) a 5 Province 
Postal Code Telephone 





Male Cheque or Money Order payable to: 
Cosmopolitan Software Services Limited 
cand mail with this order form to: 


Box 953, Dartmouth, Nova Scotia B2Y 3Z6 Attn: Order Desk 














Commodore User Group of VIC User Grou 
Westchester Robert Wartzel” NORWAY 
Ben Weyer %Stony BrookLearning Center VIC Club of Norway 
P.O. Box 1280 1424 Stony Brook Rd. Rolf Ober, 
White Plains, NY 10602 Stony Brook, NY 11790" Liljegt. 4 Halden 
Folklife Terminal Club SSO AE) Norway 
Boson 2322-R NEW ZEALAND OHIO 
Minvemoar ny ces Nelson VIC User Group Akron Area Commodore User 
Hudson Valley Commodore Club Peter Archer Group 
John G. Roj PO. Box 860 Patrick Papania 
1 Corwin Nelson, New Zealand Rm, B-201, 80 W, Bowery 
Lake Katrine, NY 12449 54179362 Akron, OH 44308 
UE Cents CLERCOM 64 
HV Commodore Club NORTH CAROLINA Hiss Sander re 
Rusty Staub 1 Observation Ct. 
35 Old Route 299 Amateur Radio PET User Group Milford, OH 45150 
New Paltz, NY 12561 Haakon 513/831-5684 
914/255-6267 RO Bons 0ore 
Raleigh, NC 27622 Commodore Computer Club of 
igen (Coemee ee Commodore 64 Research Triangle orth carter 
Dr, Lewis Levitt User Group 734 Donna Dr, 
1250 Ocean Ave. Doug Latta ‘Temperance, MI 48182 
Brooklyn, NY 11230 S704 Glendewen Rd) 313/847-0426 
210/858-3080 Raleigh, NC 27612 
919/787-5748 Commodore User Group 
BUNA EEh Commodore User Group, c/o aerate: 
Eric Dusansk 0 Up, arlan Dr. 
3 Blueberry Ridge Rd, Talton ‘ Select Business Maple Heights, OH 44137 
e| et jul |: 
Setauket, NY 11733 Tom atidnann 216/581 
National VIC Association RO, Box 749 CPU Connection (Commodore 
Michael Kleinert Durham, NC 27702 Preference Users) 
9 Crabapple Ln. 919/489-4155 Bill 
Nanuet, NY 10954 RO, Box 42032. 
914/623-8929 Microcomputer User Group Cleveland, OH 44142 
el D. Br 
BBS 623-4248 Re box HA 216/696-5093 
New pores User Group Boonville, NC 27011 Dayton Area Commodore User 
ruce D, Cohen h Grou 
222 Thompson St. je ACU Bernie Worby 
New York, NY 10012 NOD Delta Ct 4154 Tareyton Dr. 
212/673-7241 fs Bellbrook, OH 45305 
Cary, NC 27511 BI3/B4B 2065, 
New York Commodore User 919/469-3862 ae 
Pere NCS) ‘Triad Amateur Computer Society/ cree Count oalU ses SOUP 
380 Riverside Dr. 70 eee User Group Newark, OH 43055 
New York, NY 10025 eA 614/345-1327 
North Country Computer Club Greensboro, NC 27407 N.E, OHIO and N.W.PA. 
Don Taber, 919/275-8014 Commodore Users Group 
1, Box 153 ‘ Wes Boyd 
Ogdensburg, NY 13669 Peiad Ged sees Gru PO. Box 875 
315/393-46; Gregg Peele Youngstown, OH 44501 
Schenectady Commodore User Greensboro, NC 27403 Northeast Ohio Commodore User 
Grou; 919/275-9809 Group 
Timothy }. Davis ‘ Dayn Hen 
The Video Connection, Teangle Amateur Computer Club 8781 W. Ridge Rd. 
Canal Square RS ee Elyria, OH 44035 
Schenectady, NY 12305 Raleigh, NC 27619 216/322-7184 
Pate Uses Group 919/787-4137 Northeast Chiat Commodore User 
Jean E Coppola Group (NE ) 
151-28 22d Ave. Tien Consma gts oa ib Dennis Sutter 
Whitestone, NY 11357 Robiniaise co Computer Corner 
Utica Commodore User Group Tryon, NC 28782 aus Mavi Rd. 
Phil Rothstein 70183-6340 Se 
1801 Storrs Ave. The Cincinnati Commodore 
Utica, NY 13503 VIC-20 User Group ‘Computer Connection 
315/733-2244 David C. Fortenberry Ted Stalets 
RES) Boze Se 816 Beecher St. 
VIC-20 Commodore 64 User Lincolnton, NC 28092 Cincinnati, OF 45206 
Grou 704/732-0932 513/961-6582 
Bt Maple De VIC-20 & 64 Group 
Lindenhurst, NY 11757 ‘Tim Gromlovits OKLAHOMA 
516/957-1512 Rt. 11 Box 6862 
Hickory, NC 28601 Commodore Hobby User Group 
704/495-7922 doTulsa Computer Society 
PO, Box 1133 
Tulsa, OK 74101 
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Commodore Users 


Southwest Oklahoma Computer 
Club (S.W.0.C.C,) 

c/o Commodore Chapter 

PO. Box 6646 

Lawton, OK 73505 


OREGON 


Albany Corvallis C;64 User 
Group 

Al Rasmus 

2138 Chicago S.E, 

Albany, OR 97321 

503/967-8701 


Amateur Radio Group 
im Meyers 
20, Box 626 
Molalla, OR 97038 
503/239-8888 


Astoria Commodore User Group 
Kent Poulsen 

Rt. 3, Box 75 

Astoria, OR 97103 

503/325-5685 


Beaverton 64 User Group 
Jack Simpson 

11855 SW, Ridgeview Terrace 
Beaverton, OR 97005 
503/646-9596 


Central Preree VIC/64 Users 
Marvin McCleai 

499 N, Harwood Ave. 
Pineville, OR 97754 

503) 


7. 


East Portland VIC User Group 
Terry Schultz 
(665-6880 


Fire 10 VIC User Group 
Harley Cissna 

1927 S.E. 174th 
Portland, OR 97233 
503/668-6520 


Forest Grove Commodore Users 
Don Singer 
503/357-4140 


Gresham VIC/64 User Group 
Bob Brown 

625 N.W. Battaglia 

Gresham, OR 97030 
503/666-4131 


Lake Oswego PET/C64 User 


2134 N.E. 45th 
Portland, OR 97213 
503/281-4908 


Lane County User Group 
Peter Rocksvold 
584 Sierra 

ne, OR 97402 
503/688-1532 


Mt. Hood Community Coll 
PET/64 Users wy ad 

Ted Scheinman 

4044 N.E, Couch 

Portland, OR 97232 

503/667-7196 


N.E. Portland VIC User Group 
Jerry Adams 

5014.N. Montana 

Portland, OR 97217 
503/287-1433 


NINE Portland VIC Users 
Mike Heal; 

RO, Box 17405 

Portland, OR 97217 
503/283-5996 


North/Northeast Commodore 
User Group 

Mike Daigle 

PO. Box 17580 

Portland, OR 97217 

503/289-5179 


Oregon Commodore Computer 
jser Group (OCCUG) 

John E Jones 

2134 N.E, 45th Ave. 

Portland, OR 97213 

503/281-4908 


Pacific Northwest Commodore 
User Group 

Richard Tsukiji 

PO. Box 2310 

Roseburg, OR 97470 

503/672-7591 


PGE Commodore User Group 
Richard Turnock 

121 S.W, Salmon St. 

Portland, OR 97204 
503/220-3139 


Portland Airbase Officers Club 
(VIC and 64) 

Frank Chase 

RO, Box 17511 

Portland, OR 97217 

503/289-4331 

(after 9:30 PM) 


S.E, Metro Commodore User 
Group (SEMCUG) 

John Lampert 

PO. Box 42082 

Portland, OR 97242 

503/775-4232 


Salem 64 User Group 
Bud Rasmussen 

3795 Saxon Dr. S. 
Salem, OR 97302 
503/585-1515 


Salem Pacific Northwestern Bell 
VIC User Group 

Bill Black 

PO, Box 106 Room 452 

Salem, OR 97308 

503/399-4850 


Salem VIC User Group 
John Ingram 
503/370-8775 


Southern Oregon Commodore 
User Group 

Guy Stang! 

2300 Dutcher Creek Rd. 

Grants Pass, OR 97527 


Southern Oregon VIC-20 C-64 
User Group 

James Powell 

3600 Madrona Ln, 

Medford, OR 97501 

503/779-7631 


Tillamook VIC/C64 User Group 
George Shiveley 

1009 5th St. 

Tillamook, OR 97141 
503/842-4515 





Tektronics Employees VIC Users 
Rick Simonsen 
503/639-5451 


United States Commodore Users 
Grou 

PO. Box 3310 

Roseburg, OR 97470 


Vancouver Commodore User 
Group 

Chris Brown 

503/573-8489 


Yamhill County Commodore User 
Group 

Dan Linscheid 

Rt. 2 Box 246 

Sheridan, OR 97378 

503/843-2625 


PENNSYLVANIA 


Capitol Area Commodore Club 
George Crist 

3410 Cloverfield Rd. 
Harrisburg, PA 17109 

7171652: 


Commodore User Group 
Donald Moyer 

252 Makefield Rd. 
Morrisville, PA 19067 


COMPSTARS 
Mike Norm 

130 Blue Teel Circle 
Audubon, PA 19403 


Erie County Commodore Users’ 


roup 
Robert T. Glenn 

142 Forest St. 

Cambridge Springs, PA 16403. 
814/398-8146 


Main Line Commodore User 
Group (MLCUG) 

Emil Volcheck 

1046 General Allen Ln. 

West Chester, PA 19380 

215/388-1581 


Naval Air Development Center 
Commodore User Club 
Alan Blumenthal 


912 Fraser Rd, 
ir, PA 19118 





Erde 
215/441-2580 


PACS CBM User Group 
Ron Kushnier 

20th & Olney Sts. 
Philadelphia, PA 19141 
215/951-1267, 


Pittsburgh Commodore Group 
Joel A. Casar 

2015 Garrick Dr, 

Pittsburgh, PA 15235 


VIC Software Development Club 

Tracy Lee Thomas 

440 W. Sedgwick Apt. A-1 

Philadelphia, PA 19119 

215/844-4328 

Westmoreland Commodore User 
ul 

Jim Mathers 

3021 Ben Venue Dr. 

Greensburg, PA 15601 

412/836-2224 








__| 
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PUERTO RICO 


Commodore User Group of 
Puerto Rico 


San Juan, Puerto Rico 00914 
809/791-5840 (no calls before noon) 
BBS 781-0350 (8 p.m.-8 a.m.) 


RHODE ISLAND 


Narragansett Commodore Users 
Group, c/o EPA 
Environmental Research Lab 

Robert R. Pa 

South Ferry 

Narragansett, Rl 02882 


Newport Computer Club 
Dr. Matt McConeghy 

10 Maitland Ct. 

Newport, RI 02840 
401/849-2684 


SOUTH CAROLINA 


Beaufort Technical College User 
Grow 
Dean of Instruction 


Commodore Computer Club of 
Columbia 

Buster White 

318 Quincannon Dr. 

Columbia, SC 29210 

803/772-0305 


SOUTH DAKOTA 


Sioux Falls User Group 
Brandon Ulrich 

4200 S, Louise Suite 304 
Sioux Falls, SD 57105 
605/334-1059 

Doug Jones 


VIC-64 User Club 
J. Lundeen 
608 


Pierre, SD 57501 
605/224-4863 


TENNESSEE 
Chattanooga Commodore User 


Metro Computer Center 


Memphis Commodore User Club 
Ewart 

2476 Redvers Ave. 

Memphis, TN 38127 

901/358-5823 


Metro Knoxville 64 User Group 
Ed Pritchard 

7405 Oxmoor Rd. Rt. #20 
Knoxville, TN 37921 
615/938-3773 


Nashville Commodore User 


Nashville, TN 37212 
615/331-5408 
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TEXAS 


Commodore (Houston) User 
Group (CHUG) 
Mary and John Howe 
Creekview Dr. 


waster 


64 User's Group 
Grodin 


Stan 

2421 Midnight Circle 
Plano, TX 75075 

Mid-City Commodore User 


TOU) 
413 Chisholm Tr. 
Hurst, TX 76053 


PET User Group 
Jim Dallas 

14311 River Glen Dr. 
Sugarland, TX 77478 


Southeast Houston VIC User 


uBR Valley Dr. 
in a 
Houston, TX 77089 
713/481-6653 


Lubbock, TX 79413 


UTAH 


Central Utah Commodore Users 
(CUCU) 

Steve Graham 

1339 W. 1100 N. 

Pleasant Grove, UT 84062 

801/785-7118 


The Utah Commodore 64 and 
VIC-20 User Group 

Rodney Keller 

652 W. 700 N. 

Clearfield, UT 84015 

801/776-3950 


VIC LICK 

David Pignar 

% Mouniain Computer Society 
PO. Box 1154 

Sandy, UT 84091 

801/261-0119 


VIRGINIA 
Capitol Area PET Enthusiasts 
(C-64) 


William Tyler 
607 Abbotts Ln. 
Falls Church, VA 22046 


Central Virginia User Group 
Dale Moore 

Rt. 3 Box 451 

Hurt, VA 24563 


Fredericksburg Area Computer 
Enthusiasts 

Michael Parker 

PO, Box 324 

Locust Grove, VA 22508 


chburg User Grou 
Blak Rossel nol i 
Rt. 2, Box 

Bynchburg, ¥ ‘VA 24501 


Roanoke Area Computer 


Roanoke, VA 24019 
703/362-8960 


Southwestern Virginia 


Elk Creek, VA 24326 
703/655-4144 


Tidewater Commodore User 
Group 

Fred Monson 

4917 West Grove Rd, 

Virginia Beach, VA 23455 


VIC-20 & CBM 64 User Club 
Donnie L. Thompson 

1502 Harvard Rd. 
Richmond, VA 23226 
804/288-4962 


Washington Area Commodore 
User Group 
Richard Jackson 
RO. Box 93, 
Mount Vernon, VA 22121 
703/360-7677 


WASHINGTON 
CBM 64 Business & Utility User 


Group 

Khamsing S., c/o Softechnics 
3212 Beacon Ave. 

Seattle, WA 98144 
206/723-4980 


CBM Users Group 
Rick Beaber 

803 Euclid Way 
Centralia, WA'98531 


Club 64 

Hal Scheidt 

6735 Tracyton Blvd. NW 
Bremerton, WA 98310 
602/692-8295 


Commodore Computer Club 
Donald H. Sims 


Commodore Users of Tacoma 
Marwan Samman 

1734 Fernside Dr. S. 

Tacoma, WA 98465 
206/565-5023 


COMPUTER Club, do 
Honk ll Inc. 

John Goddard 

5303 Shilshole Ave. NW 

Seattle, WA 98107 

206/789-2000 


Edmonds Commodore User 


Longview Commodore User 
TOU] 
Stephen Jones 


ve. 
ope WA 98632 
977-8317 





NW Commodore User Group 
Richard Ball 





WEST GERMANY 





Commodore Users of Systems, 


Software and Hardware 
2565 Dexter N. #203 VIC-20/64 Games Exchange (C.U.S.S.H.) 
Seattle, WA 98109 Michael Block Tim Tremmel 
206/284-9417 Breukerskamp 35, 3614 Sovereign Dr. 
BBS 743-6021 D.5750, Menden 2 Racine, WI 
fest Germany 414/554-0156 
PSACEE BBS 554-9520 
1800 Taylor Ave. N. WEST VIRGINIA Eau Claire Area CBM 64 User 
Seattle, WA 98109 ‘Tri-State Commodore Users Grow 
Seattle Commodore 64 User Mare Hutton ROS box 1s 
Gan 73 Pine Hill Estates begat tnoes 
Kenova, WV 25530 AS EA 
Dr. Allen M, Gown 7 715/874-5972 
Dept of Pathology SM-30, 304/453-2124 
Univ, of Wash. Madison Area Commodore User 
Seattle, WA 98195, WISCONSIN Group 
John Carvin 
Spokane Commodore User Group Commodore and VIC Enthusiasts 1552 Park St. 
ferry and Sara Voss (C.A.V.E.) Middleton, W153562 
W. 1918 Boone Ave. Mike Shaffer 608/831-4852 
Spokane, WA 99201 PO. Box 33 
1327-7202. Crivitz, WI54114 Biilaniae EGER a 
its (M.A.C.E,} 
World Wide User Group (Military Heese Kevin D Wilde. , 
Personnel Only) Commodore 64 and VIC-20 RO. Box 340 
R. Smith Software Exchange Group Elm Grove, WI 53122 
RO, Box 98682 E,J. Rosenberg 414/259-5991 
Tacoma, WA 98498 PO. Box 224 
206/535-0336 on, WI53575 S.W.LT.CH. 
Ha Pag 
WASHINGTON D.C. Commodore Lovers Users Bunch Menomonee Falls, WI 53051 
USO Computer Club Vicz20 and C-64 (C.L.U.B. 84) 414/255-7044 
USO Outreach Center ‘oger Christensen 
Seenl, Guenther BO. Box 72 Wankesbt Area VIC Enthusiasts 
207 Beyer Rd, SW Caledonia, WI Pe 
Washington, DC 20382 oz Waukesha, W153187-0641  @ 


sepsis 











sch 
just give your rune ands 
will make sure they get on every requi 
Plus, if you want to noodle with nun 
UNCLE! has a calculator-type scratch pad. You 
can't fool your UNCLEI; if you enter an error, it 
will be flagged. When you're through conversing 
with NCEE ‘on your Commodore 64 (single 
drive), simply feed the forms and schedules 
into a 16-17 cpl printer and UNCLE! will prepare 
every one of them. How much so put UNCLE! 
in your Commodore? $64! 


VARANGER Computing - 180 Grand Avenue, 
Suite 900, Oakland, CA 94612 
Telephone (415) 482-3861 


eee Calif, Res, add 6('/:)% Sales Tax. Visa/MasterCard accepted. 
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Nevets | 


Steven R. McCloskey 


A clever action game, “Nevets” requires both 
strategy and a lot of dexterity with your joy- 
stick. Using character feeriic, it is written 
for the unexpanded VIC. We've added a ver- 
sion for the 64. 

(ep ae 


In “Nevets,” you are transported to the Land of 
Adnerb, where your mission is to protect four 
power capsules against the ever encroaching 
Nevets. Your only defense against the thieving 
Nevets is a turret gun, which you control with 
your joystick. 

The screen displays a lower and an upper 
level, with two power capsules at the center of 
each level. The Nevets may approach from right 
or left on either level. The turret, at the bottom 
center of the screen, can be moved up and down 
with the joystick, and the gun can be aimed by 
moving the joystick left and right. Pressing the 
fire button fires the gun. 

There are 40 levels of play. You must destroy 
your quota of Nevets (displayed on the screen) 
within 60 seconds to get to the next higher level. 
When you meet the quota, you receive a bonus— 





(TEUNECRSUNURNMAN ORATOR AORN ARORA) 


One power pod has already been stolen. The player is about 
to eliminate one of the thieving Nevets in the VIC version. 
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the time remaining times ten. 

The game ends when time runs out or all 
four power capsules have been stolen. You then 
have the option of playing again. The game also 
keeps track of high score. 


VIC Program Structure 
Here's the VIC version program structure for those 
interested in how the program was written: 


Lines 

5-70 Titleand graphics 

75-90 Screensetup 

110-160 Joystick reading routine 
165-190 Variable setup 

200-330 Main program loop 

400-410 Fire subroutine 

500-510 Game over subroutine 
600-610 Nevet #2subroutine 
700-710 Nevet #1 subroutine 
800-840 Nevet #2 variable subroutine 
900-940 Nevet #1 variable subroutine 
950-960 Powercapsule subroutine 


See program listings on page 143. 


=— . RA 


It may be too late to defend both power pods; the Nevets are 
getting too close (64 version). @ 


What do voice 
synthesizers have 
in common with 
movies? 

They don’t make 
them like they 
used to. 

Because now 
there is S.A.M. The 
Software Automatic Mouth™ 
The first software-only speech 
synthesizer for Commodore 64, 
Atari and Apple computers. 

Developed by Mark Barton 
of Don't Ask Software, S.A.M. 
is designed to give you all 
the power of conventional 





hardware speech 
devices. Without 
the hardware. 

And without the 
high price. 

S.A.M. is the 
program that 
makes other pro- 
grams talk. Busi- 
ness programs. Educational 
programs. Recreational pro- 
grams, too. 

You can use it in any num- 
ber of useful ways, 

To write instructions that talk. 
Stories that tell themselves. 
And creative new games with 


characters that converse or 
opponents that crack jokes. 

And you can do it all with 
ease. With phonetic or plain 
English input. 

S.A.M. can say anything you 
like, any way you like—you 
choose the pitch, tone, speed 
and inflection. 

If you want, you can even 
choose the voice. 

Here's talking to you, kid. 
(The Apple version includes an 
8-bit digital-to-analog converter 
and audio amplifier on a card, 
It requires 48K and a speaker. 
The Atari version requires 32K.) 


Say it again, S.A.M. 


TRO! 


Sloped by Don'f Ask Cpmpatet Software, Ing. 
] / T ~ 
s 


8295 South/La Cienega Blvd/ 


f 


Inglewood, CA P0301/(213).215 9529 / 


| =a) 
LAtgii is a trademark of Atatiiag. / 
ectronigs, Ltd. 7 





Richard L. Witkover 





“Bingo 64” is a cleverly written computer ver- 
sion of the classic game. It makes good use of 
the 64’s graphics and sound capabilities to pro- 
vide you and three friends with many exciting 
games of bingo. A joystick is required. 
a 


Few people have not known the anticipation, 
heard the click of the balls, the call of the number, 
and finally, the excited shout of “Bingo!” Here’s a 
four-player version of this world-famous game 
written for the Commodore 64. 


Setting Up The Game 


Before you begin playing, you have to choose 
your mode of play from a menu. Manual ball feed 
allows you to control the pace of the game. If you 
opt for auto ball feed, the computer automatically 
picks the next number. Choose manual cover if 
you want to cover the spots on your card yourself 
(using the joystick). If you want your 64 to cover 
the spots, pick auto cover. 

After you make your choices, four blank cards 
are displayed on the screen. Each column ona 
card corresponds to one letter of the word BINGO. 
The five numbers in each column are selected 
from 15 possible values and are checked to prevent 
duplication. This process is repeated for all four 
cards. The selected numbers are displayed on the 
cards and stored in the three-dimensional array 
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2 % 4 
C%. A cover token is then placed over the free 
box in the center, giving it the status of a called 
number. 


Ready To Play 

The cards are on the screen, and you are ready to 
begin playing. At the bottom of the screen are 
five balls (sprites), each labeled with a letter in the 
word BINGO. 

Numbers are selected through a random 
graphics routine. The lettered balls jump up and 
down like kernels of popcorn. The height a ball 
reaches is random. If it jumps above a line on the 
screen, it is selected. If not, it falls back with a 
plop, and another ball is given a chance. 

After the column letter has been selected, a 
random number is chosen. To prevent duplica- 
tion, all called numbers are entered in the two- 
dimensional array N%. The newly selected 
number is compared to the numbers in the array. 
If a match occurs, the number is discarded and 
another one generated. When a unique number is 
found, it is printed on the enlarged sprite in the 
middle of the screen, along with its letter. 


Checking For A Match 


Next, each number in the appropriate column on 
each card is checked for a match. A chime sound 
signifies a match. If the number doesn’t appear 
on any of the four cards, a sour bong sounds. 





lector 


KeY os 

The world may be short of oil. And short of jobs. But there's no shortage of entertainment. 
Arcades. Movies. Amusement parks. TV. Concerts. Records. You've got your choice. And every day, 
more of you are choosing HesWare™ computer games. : ¢ i 

; That's because only the best games earn the HesWare title. Tough, challenging, arcade quality 
action ees le Sel Predaioy Retro Wa Robot Panic" 
ind-bending strategy and role playing adventures 
like Pharaoh's Curse and Oubliette™ ; Pleases the 
wWetia cenew ces at Tee Ww bd eal io be believed. Tt 
ould you believe Attack of the Mutant Camels™?? 

You don't need an expensive computer to enjoy customer, 

HesWare action, either. HesWare programs are available 


on cartridge, diskette or cassette for VIC 20;" Commodore 64," ts / Wi; 
Atari® and IBM® personal computers. ‘ eSvvare. 
When you pick up a HesWare game, you know it’s ready 

for the toughest test of all: beating out the tough competition Human Engineered Software 

for your attention. : PO North Ti oeve % 
_ HesWare games. Just one of the ways HesWare is 800-227-6703 

expanding the computer experience. Look for them at your eet) 

favorite software retail Dept. C20 

VIC 20 and Commodore 64 are trademar ydore Electronics Ltd. Atari is tes 

1BM PC is a registered trademark of Inte jiness Machines. Pharaoh's Cur 

Oubliette is a trademark of ISA Software. 


Gridrunner Retro Ball 








The computer calls the shots in ‘Bingo 64.”” 


Variable Function 

AlM4 Parameters of pattern for winner scan. 
AU ‘Mode flag for ball feed and cover 
BO Bingo flag 

B0,1 Digits under joystick cursor 

C% Card numbers array 

CC,CM Joystick cursor position 

cD Card number 

cL Column number 

Cco% Ball colorarray 

DU% Duration of notes array 


FB Fire button switch 
FH%,FL% Music frequency high and low bytes 
FR 


Joystick row number 
HB High byte of screen color memory 
jo-3 Joystick direction switches, 
L Ballletterarray 
LN Length of ball number string 
N% Called numberarray 
NC Ball color index 
NM Called number 
NN No-number match flag 
NU Value of called number within column (115), 
N1,2 Digits of called number 
OB Reversed number flag (logical variable) 
PD. Joystick memory register contents. 
Pi Screen memory location of N1 
RN Row number on card 
S) Startof screen memory for cards 
SD% Sprite data array 
SN Screen memory location of box digit 
Ss Sound chip memory location; also, screen-to- 
color memory offset 
v Video chip memory location 
WLW] Indices of box to be checked for winner 
WM Memory location of box to be checked for winner 
WP Contents of WM 
x Ball X-position array 
Y Ball Y-position array 
YM Maximum ball height 
Zz Present box number value 


If you selected auto cover, the computer 
covers a matched number by printing it as a red 
reversed character. If you chose manual cover, 
you must use the joystick to position the marker 
and press the fire button to cover your number. If 
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you make a mistake, you lose the number. 

When a number is covered, the program 
checks the row, column, and diagonal for a bingo. 
Since the covered numbers have been printed in 
reversed character mode, this is easily done from 
screen memory. The program needs to check the 
five boxes to see if they all contain reversed char- 
acters (screen codes greater than 127). If a winner 
is found, the covers change color and music plays. 
Each card is checked for the possibility of multiple 
winners. 


One Machine Language 
Routine 
The first DATA line contains a short machine 
language routine which initializes screen color 
and sprite memory locations. The remaining 
DATA statements set up sprite data and music. 
The program contains extensive REMarks to make 
the logic flow easier to follow, and the variable 
names are listed below, with their functions. If 
you would like a copy of this program, send $3, a 
self-addressed, stamped envelope, and a blank 
cassette or 1541 diskette to: 

Richard L. Witkover 

P.O. Box 560 

Upton, NY 11973 


See program listing on page 157. @ 





Modem with Printer Interface for 
Atari* Commodore, and Vic 


++ 
Direct connect, autodial, autoanswer modem, 
also runs a parallel printer. 300 baud modem has 
built in Centronics printer port. Simultaneously 


prints whatever appears on your screen as it 
comes over the telephone. 


One box does it all so you can receive the most 
from your computer. Terminal program supplied, 
complete and ready to run. : 

Auto-Print Microconnection retails for $149.95. 


*Is not a replacement for Atari 850 Interface. 


the microperipheral corporation 
2565 » 152nd Avenue NE. Redmond. WA 98052 
(206) 881-7544 














TURN YOUR COMMODORE-64 INTO THE 
HOTTEST ARCADE MACHINE IN TOWN 





































O'RILEY’S 
MINE” 


You're a mad 
Irishman digging 
your way through 
an abandoned mine 
filled with oil, 
coal, gold, rubies, 
diamonds—and 
hungry creatures. 
You'll need the luck 
of the Irish to sur- aie threatening action 
vive, but with so as you pilot your 
much at stake, it's 1 : (Sy ‘Moon Shuttle 
a chance you're f through outer space 
willing to take. in this home version 
qn caHHYive +t ¢ : 3 of the Nichibutsu® 
ai A q RY favorite. Awaiting you 
is The Prince of Dark- 
ness and his forces, 
which mysteriously 
multiply! 


MOON 
SHUTTLE™ 





OPRILEY'S MINE* avoilable for Aton? 
Apple? and Commodore 64* 


‘coming toon for Appie®™ 


POOYAN™ 


One of the 

biggest arcade 

game hits from 

Konami is a game 

fa fesiactioniin 

life-and-death en- - X See 
counters. You battle a as GENESIS 
pack of hungry wolves Rowe 


eager to catch your de- edge of disaster, you 
fenseless piglets. You'll 


s are the deadly King 
nese crated : = ME _ Scorpion defencing 

. 2 4 
arcade hit from Datasoft. A Zip S your domain against 


fatally venomous 
spiders. Genesis cap- 
tures all the intensity 
of Design Labs’ 
arcade version of 
the first great 


POOYAN" avciloble for Atori®, Radio battle on earth. 


‘Shack Color®, Apple®, coming soon for 
SE Commodore 54" 


Our reputation as one of the premier game manufacturers 
assures you of the highest quality attainable in action, strategy 
and graphics. For the hottest titles in entertainment, keep your eye on the leader—DATASOFT. 


You'll Find The Best In Home Computer Software 


GENESIS™ available for Atorit, 
Apple®, IBM-PC®, ond 
Commodore-64°. 


Pooyan™ is a trademark of Konami Industries Company, Ltd. ‘Moon Shuttle? is o registered trademark of Nichibutsu, USA. 


GENESIS” ond Design Lobs ore trademarks of Design Labs. 
9421 Winnetka Avenue, Chatsworth, CA 91311 (213) 701-5161 ©1983 DATASOFT INC, 





OfRiley’s Mine® and Datosoft® are registered trodemorks 
of Datasoft Inc. 


Some Answers From Commodore: 


A Conversation 
With Myrddin Jones 


Selby Bateman, Assistant Editor, Features 
Tom Halfhill, Editor, COMPUTE!’s PC & PCjr Magazine 


Myrddin L. Jones is vice president of marketing for the 
Computer Systeins Division of Commodore Business 
Machines, Inc. At the winter CES he spoke to COM- 
PUTE!'s GAZETTE about the new 264 line of computers, 
Commodore's continued support for the VIC-20 and 
64, and his perception of the changing needs of computer 
buyers. 

=a 


GAZETTE: Now that the Commodore 264 line of 
computers has been introduced, how do you re- 
spond to 64 and VIC-20 users who may fear their 
computers will be given less attention? 


Jones: First of all, the 64 is one of the largest bases 
for third-party and Commodore software which 
has only just started. Most of our resources are 
currently dedicated to 64 software. And the trans- 
ition, as I understand it, from 64 to 264 software 
isn’t that great. So I don’t really see it being any 
threat to the availability for the 64. 

I think the Commodore 64 is such a well- 
used machine in education today—and our thrust 
is more and more toward productivity and 
educational-type software—that I don’t think 
there will be any diminution of support for the 
64. We've already sold over a million of them in 
the U.S. We're way ahead of our schedule, so I 
don’t think you'll see it being abandoned at all. 

Frankly, the 264 is really not aimed at quite 
the same target market as the Commodore 64, 
because the 64 is oriented toward music and 
sprites and gaming, and it’s very good for that. 
The 264 has strength in built-in programming, 
capability, and as we move forward, in built-in 
software to suit a specific need. It has more word 
processing, small business package applications 
rather than gaming. 

I think they'll complement each other rather 
than substitute for each other. And of course the 
264 is going to be higher-priced. 

GAZETTE: Why buy a 264 instead of a 64 that has a 
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word processor and, say, a Simon’s BASIC? It 
would be the equivalent of the 264 for less money. 
Jones: The difference is that the market is changing 
because the consumer is far more knowledgeable. 
So from a practical viewpoint, they look for 
more and more built-in support and material. 
That's what we're aiming to do with the 264 
series—give them some choices of basic machines. 
If they want a word processing-based machine 
without compromising, we have a machine to 
suit them. If they’re interested in financial analysis 
applications or want a basic machine with that 
built in to suit them, I’m sure as we move along 
you'll see more and more complexity in what we're 
able to integrate into the equipment. 
GAZETTE: Will the built-in software on ROM chips 
be installed at the factory or done by the dealer? 


Jones: It will be done at the factory. 


GAZETTE: You have changed the keyboard on the 
264 from the keyboard used on the 64. Why? 


Jones: The whole design concept for the machine 
was different. I think we started out working with 
the SX64 (Commodore's portable 64) and found 
out that the keyboard has a slightly different 
characteristic than the 64. And we learned from 
some of the things that we found with the 64, 
which is a good bread-and-butter machine. I think 
we have a little more class with the keyboard on 
the 264. It’s styled better. 

I think the cursor controls are easier to use 
for the average person. And we shifted around 
the function buttons for the long haul to make 
sure we had a product that was compatible with 
the 19-button numeric keyboard, so that there is a 
continuity of style in the family like we had on 
the Commodore 64 with the VIC-20. 

The other thing we've done is that we don’t 
have that bulky control console with a lot of stuff 
on it. We have more of our works inside the 
keyboard itself than most other people do. 


GAZETTE: Will the new family of computers—the 
264, 364, and SX64—be sold through all of the 
same outlets as the VIC-20 and the Commodore 64? 
Jones: Absolutely. I really don’t think there’s any 
difference anymore. The old difference between a 
personal computer and a home computer and a 
high-end videogame has vanished. There’s a desk- 
top computer now with varying degrees of capa- 
bility and varying orientations. That's because 
everybody's going after the same space. 

I think what happened with Coleco and the 
Adam is that they built in something that they 
compromised. As a result, they have the worst of 
two worlds instead of the best of two worlds. 
What we try to do with our planning is to put 
something in that’s fully featured and that is 
exactly the same thing that you could buy off the 
shelf. So that, in effect, when you get it, you're 
getting something that’s easy to use. You set it up 
and you roll. That’s a smart philosophy and I 
applaud that. 

Our designers did that, and it was in process 
long before I joined the organization. You've seen 
our 3-Plus-1 [integrated personal productivity 
package]. It brings the technology down to the 
right level. It’s got enough variety for the average 
small business. We've converted it, with the 
graphics, into something they can visualize very 
easily with very little instruction. It’s nowhere 
near a Lotus 1-2-3, but it gives you enough of the 
kind of capability that the average user can get 
mileage out of. 

That’s what we're trying to achieve in almost 
every category of software we've got. Except 
gaming, where we’re going after quality at a good 
price. That soccer game [International Soccer] is an 
example of the things you're going to see from us. 
Some of the playabilities we've got are outstanding. 
GAZETTE: You've said that the 264 will be available 
in the spring, essentially in the second quarter of 
1984. How realistic is that date? 

Jones: I think we're pretty far along. We have the 
operations manual already available. We also 
have 40 pieces of software for it that are ready to 
produce. They’re the best of the Commodore 64 
series, So, we're trying to have some continuity. 
GAZETTE: Have VIC-20 sales begun to taper off? 


Jones: Well, naturally they would. We started 
emphasizing the 64 last April because we felt there 
was need for a 64K machine. However, the VIC-20 
has been very steady, and we're still getting good 
orders from everybody. We'll continue to sell it as 
long as the customer buys it. We think there’s a 
place for a starter computer at under a hundred 
dollars. 

GAZETTE: We've heard rumors that Commodore 
itself might upgrade the hardware on the VIC-20— 
give it 16K. Is anything like that planned? 








Jones: It’s been kicked around, but I don’t think 
any decision’s been made. It’s a good seller. 
GAZETTE: When do you think we'll see the 364 
available? 


Jones: After the 264. [Laughs.] It depends on their 
priorities. We'll have to go back and gauge the 
reactions. But I think you'll see the 364 getting the 
voice built in and getting the numeric system or- 
ganized, but it will take a little longer than the 264. 
I would perceive it to be before the fall. I think 
you'll see the whole series out before the end of 
the summer. 


GAZETTE: Are there any other members of the 264 
family planned? 


Jones: I’m not aware of any. Essentially it’s a 
productivity-oriented machine and I’m sure there 
are a lot of other things we're going to end up 
doing. It has unlimited flexibility, since you can 
build in a variety of software. We'll have to see 
what happens in the market. 

Our perception of computers may be a little 
different than others. The easiest analogy is that 
the keyboard is the library card, and to survive 
long-term, you have to offer the people who use 
it a variety of books that suit almost everybody’s 
individual taste. And that’s a difficult thing to do 
when you have to reinvent the wheel. 

Look at education [software]. You could have 
six hundred or seven hundred titles in education 
alone. Our aim is to have a matrix of opportunities 
ina library. You could almost take the library card 
system and categorize it and say, well, we must 
have representative samples here because the 
average home requires this and this and this and 
this. 

That's the way we're approaching our whole 
software strategy now, which says that we have 
to provide a library that’s equivalent to the public 
library and a pricing that makes it comfortable for 
the average person at home to buy. It’s a new 
concept we developed, and we're just beginning 
to implement it now. @ 


An income tax program for everyone to use. 
TAX COMPUTATION has been approved for 
COMMODORE'S ENCYCLOPEDIA OF 
SOFTWARE as well as many other directories. 
Your taxes will be completed quickly, easily, and 
to your benefit. 

TAX COMPUTATION Commodore 64 ees 

Vv h 4A $19. 

K.R.Ruliman — V'C 20. TIS9/4A § 


4550 Murray # 81 The cost of the program is tax 


ible along with part of the 
Beaverton, OR 97005 coat your computer 
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Albert Zap, 
Won't You 


Please Come 
Home? 


Fred D'Ignazio, Associate Editor 


Albert Zap woke up froma long nap and looked 
out the window of his house. It was a sunny day. 
The sky was blue. The grass was so green it 
glowed. Albert Zap decided it was a perfect day 
for a walk. 

Albert walked out the front door of his house. 
“Tra-la-la!’’ he sang. He skipped through the gate 
of the white picket fence. “Such a perfect day for 
a walk,” he said to himself. 

Then something terrible happened. Albert 
had wandered only twenty yards from the front 
door of his house when the sky grew dark. A 
shadow fell on him and on the grass at his feet. 
Albert looked up, expecting to see a gloomy 
storm cloud passing overhead. He gasped. Some- 
thing was falling out of the sky. It was a giant 
purple letter, and it was falling right toward him. 
If he didn’t move quickly, he, Albert Zap, was 
sure to get zapped! 
Albert tried to run, but he couldn’ lift his feet. 
le was frozen in one spot. He looked up again. 

e elephant-sized letter was coming closer and 
loser, but he couldn’t move. What was he to do? 


Coming To Albert’s Rescue 


Computing families to the rescue! 
Albert needs a hero or heroine to save him. 
But not just any hero or heroine will do. It must 
e one with steady hands, nerves of crystalline 
aphite, and a heart that’s true. 































ou studied all the computers 

and finally chose the one your 

family found most useful.One 

of the main reasons you wanted 
a computer in the first place is to help 
your children in school. Not just to 
teach them how to use a computer, 
but also to help them get good grades 
in basic school subjects like reading 
or geography, 

That's why you should know 

about AEC, American Educational 


parbins allows parents to enter material into 
jourfavorite lively, interactive format. And be- 
software stor, cause AEC’s programs are grade- 
‘ \EC’s prog gr 

Keely “? level oriented, you can help your 
educationat Child all the way through school. 
Jeaflet. 
AEC doesn’t play games 


with education. 


AEC programs do contain games, but 
only as rewards for learning achieve- 
ment. For example, once your child 


Computer - one of the country’s AEC knows that successfully completes the objective 

most important developers and good grades are important. in the Matchmaker Geography pro- 

publishers of educational software. gram, he or she can play an exciting, 
Any educational software could help action-packed 

You can help your child all school performance in some way. game. 











‘the way through school 


That's because the computer is such 
‘and beyond. 


a patient teacher, giving instant feed- 
back to questions and allowing chil- 
dren to learn at their own pace. 

But AEC software has an impor- 
tant advantage. Our approach has 
been student tested under actual 
classroom conditions. So we know 
it keeps the child’s interest while it 
AEC grew up on education. teaches. 





The management of AEC started in AEC gets parents involved in 
educational publishing, with collec- the learning process. 
tively over 100 years of experience Sure, the games are fun. But 


in the field. AEC knows curriculum 
and how American education is _ 
practiced in the classroom. 


With either AEC’s they’re not the basis, and certainly 
MATCHMAKER"or not the primary focus, of any AEC 
EASYREADER" Series, software. Our focus is strictly on 








That's important because As « you can take your learning, And isn’t that what you 
children should learn at @ child through the grades _ buy educational software for? 
home the same way they 4 in subjects such as If you have more questions about 
learn at school. Other- Phonics, Word Attack —_ educational software, 









wise, you'll have a very 
confused child,and con- 
fusion isnot the way | © 
to better grades or 
better learning. 


-. Skills,ReadingCom- _ contact your nearest 
prehension, Spanish, | AEC educational soft- 
World or US Geogra- ware center. And 
phy, and Grammar. Our _ thanks for being a 
teacher tested system concerned parent. 


American Educational Computer= 


2450 Embarcadero Way, Palo Alto,CA 94303 


[All AEC Products are compatibie with Apple:* ISM® IC, Atatt 800," TRS 80™ Color and Commodore 647 Microcomputers. TM significs manufacturer’ trademark. 00 signites manufacturer's registered tradematk 


And one more thing: Albert’s hero or heroine 
must be able to hunt across the computer keyboard 
and peck the letter that is about to zap him. 

Do you qualify? Does your mom or dad? Or 
your kid sister? Then pitch in, find the letter on 
the keyboard that is threatening Albert Zap, and 
give it a quick tap. 

If you find the letter before it finds Albert, 
the letter will crumble like a peanut butter cookie 
you've just sat on. 


You’re Not Home Yet, 
Albert Zap 


When the letter vanishes, Albert breathes a sigh 
of relief. He has decided that he has had enough 
walking for today. All he wants to do is go home. 
He takes a giant step in the direction of his house. 

But what is this? Another letter, this time a 
giant green P, is heading right for him. And, as 
Albert stares at the sky, other letters follow the P: 
a plump yellow W, a pair of brown Q’s, anda 
hefty green Z. 

Albert feels like Chicken Little. The sky is 
falling. All he wants is to go home. But he can’t 
move on his own. 

Albert looks your way, You are his only hope. 
Can you find the letters on the keyboard and tap 
them, one at a time, before they reach Albert? 


Finding A Champion 

Albert is not picky about his hero or heroine. He 
might be a four-year-old with a quick little finger. 
Or a 68-year-old who won't desert Albert in his 
hour of need. He'll stay by the keyboard hunting 
and pecking until he gets Albert home. 

But one thing is certain: Albert needs a true 
champion, someone who will stick with him even 
when the going gets tough. 

And it does get tough. 

Getting Albert home looks deceptively easy. 
After all, the letters are floating down so slowly, 
lazily dropping from the sky. This game is a snap. 
You merrily tap the keys, and Albert jogs along 
toward the safety of his house. 

Then disaster strikes. A giant Y falls toward 
Albert. You see the Y and try to type it, but you 
miss and strike a T instead. 

Albert notices your keyboarding blooper and 
despairs. He loses all hope. And he loses his mind. 
He does the opposite of what he is supposed to 
do. He turns around and takes a giant step away 
from his home. 

Albert's foolish behavior rattles you. Hastily 
you type another letter. You aim for a B but instead 
type a V. Albert takes another giant step away 
from home. You see more letters and make more 
mistakes. Now Albert is jogging in the wrong 
direction. The distance between him and his home 
is steadily widening. 
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Safe At Last! 


Don’t give up hope. Albert isn’t lost yet. A true 
champion will keep typing. She may hit some 
wrong letters, but most of the letters will be right. 
Each time she types the wrong letter, Albert scur- 
ries away from his home. But each time she taps 
the right letter, Albert turns around and runs in 
the right direction. 

And eventually Albert makes it home. 





Albert Zap won't make it back this time in AlphaZap. 


But if he doesn’t, that’s all right, too. Albert 
isn’t hurt—except for a mild headache from being 
beaned with a blimp-sized letter, And, with just 
the touch of a button, you can start the game over 
again and give him another chance. Once again, 
Albert is back outside his house going for a walk, 
and a new group of overweight letters is falling 
out of the sky. You can keep coming to Albert's 
rescue until you finally bring him home. 

Unfortunately, Albert Zap does not have a 
lot of sense. As soon as you bring him home, in- 
stead of thanking you he heads back out his front 
door for another walk. Seconds later, more letters 
are raining down out of the sky. 

It seems Albert Zap likes to live dangerously. 


QuickFinger 
Albert Zap is the hero of a typing game called 
AlphaZap, put out by Quick Brown Fox, Inc.—the 
people who make the Quick Brown Fox word 
processor for the VIC-20 and the Commodore 64. 

AlphaZap runs on the Commodore 64. It is 
part of a trio of typing games, collectively known as 
QuickFinger. The QuickFinger package comes on 
disk and costs under $40, It should already be in 
the stores, but if you can’t find it, you should 
contact Quick Brown Fox directly: 

Quick Brown Fox 

536 Broadway 

New York, NY 10012 

(212) 925-8290 


Kids climb to the top in 
our playground.. 


Because we offer more than just educational games. Our unique software brings the. magic touch of the 
Edumate Light Pen™ together with the amazing computer voice of S.A.M.™, the Software Automatic Mouth, so children can interact 
directly with our teaching programs. Playground Software™ makes learning and learning to use the computer child’s play! 


Our playground of active, colorful animals will have your 
child spelling new words in no time at all, Animal Crackers™ 
combines the use of the Edumate Light Pen"™ and children’s 
fascination with animals and computers to teach your 
children the alphabet as they lear to spell. By simply 
touching a letter on the screen with the Edumate Light Pen™, 
your children will create a screen full of animals and other 
playful objects, Not only is it fun, it’s educational! 


Unleash the creative talents of the big kids and the little kids 
in your family with the first electronic coloring book. Com- 
puter Crayons™ comes complete with ready-to-paint scenes 
and an artist’s palette of vibrant color, Additional options per- 
mit you to save and restore pictures easily, draw circles, lines, 
boxes, and erase in a single stroke. 

Let your imagination run wild with the Sketch Pad that 
allows you to create your own video paintings {rom scratch, 

Now anyone can transform our Edumate Light Pen™ into 
an electronic paint brush with Computer Crayons™! 


The most fundamental lesson every child must lear is how 
to draw the letters of the alphabet. The Alphabet Arcade™ 
utilizes,the Edumate Light Pen™ and an exciting arcade en- 
vironment to provide the children with an innovative way to 
acquire basic lettering skills, Mistakes are noted immediately 
and correct entries rewarded in a series of action-packed set- 
tings that will delight and inspire your children, Discovering 
the alphabet has never been this much fun! 


Playground Software™ presents a series of engrossing tales 
that use our Edumate Light Pen™ and your child’s imagina~ Bedtime 
tion to tell a story, 

Our first Bedtime Story enlists the aid of your child to help Storie . 
Little Red Riding Hood escape from the Mean Old Wolf, and s™ 
has all the colorful animation and full-scale sound that 
children love, 

Your child will be taught letter and word recognition while 
having all the fun that goes along with helping to tell a story. 
So let your child play a part in the first of our interactive and 
educational bedtime stories...Little Red Riding Hood! 


Preschooy 


yyoround Sol lghipen and joystick compatib 


Playground Software...Kids are all over us! 


Each package $29.95 on disk or cassette. Prices subject to change without notice. See your local dealer or order direct from p.o, box 3470, 
department cg, chapel hill, north carolina 27514. Add $3.00 for postage and handling. Credit card orders call 1-800-334-SOFT. 


During December and January you can take advantage of our Special Christmas Offer and receive an Edumate Light 
Pen" (retail price $29.95) for only $44.95 when you purchase all four Playground Sottware™ packages, or receive a 10% 
discount toward the purchase of the Edumate Light Pen™ when you buy any Playground Sottware™ program. 


‘Atari 400/000™ and Commodore 64™ are rks of Alar Inc. and Commodore Electronics, Inc. respectively. 8.AM.™ ia a trademark of Don’t Ask Software. 





Keyboard Pacer 


Tackling The Terrible Keyboard 


Which part of a computer terrifies people the 
most? Is it the alien-looking floppy disk drive? 
The blank, empty-looking display screen? The 
snakelike cables? 

Nope, it’s the keyboard. The keyboard is like 
a wall that most adults and kids have to climb 
over. And most of them don’t. 

For little kids the keyboard is a jungle, stuffed 
with too many keys in too small a space. Kids’ 
eye-scanning and finger-tapping motor skills often 
aren't up to tracking down and pressing that 
unique key that will make a program run ora 
game reward them. Computer keys often leave 
small children with tears, anger, and frustration, 

The situation isn’t much better for adults. 
Most adults don’t know how to touch-type. Most 
adults have never heard of QWERTY. They have 
learned their alphabet from A through Z, then 
they look at a computer keyboard and find the 
letters all mixed up. 

And if the jumbled letters weren’t enough to 
stop them, all those extra keys on a computer 
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keyboard will. How mighta fearful adult feel about 
the keys with names like BREAK, STOP, CON- 
TROL, END, RETURN, and ESCAPE? For an 
anxious adult, even a “friendly” computer key like 
HELP can take on an ominous, sinister meaning. 


Taking The First Step 


Yet what would computers be without their 
keyboards? There are more and more alternatives 
to the keyboard. New devices for interacting with 
the computer are now appearing on the market, 
including mice, touch pads, and light pens. But 
the computer keyboard is still the primary way 
most people tell the computer what they want it 
to do. 

We have to find ways to help people cope 
with the computer keyboard. One way is the 
typing program. 

Typing programs, like Typing Tutor by IBM, 
Type Attack by Sirius, and MasterType by Scar- 
borough, are a godsend to the average family 
member who is interested in learning how to use 
a computer but who is put off by the computer 
keyboard, 

QuickFinger, from Quick Brown Fox, is, in my 
opinion, one of the best of these typing programs. 
It is for a very popular machine (the Commodore 
64). It makes learning the computer keys easy 
and fun rather than boring and tedious. It has a 
trio of games, so you can switch back and forth. 
When you get tired of playing one game, you can 
switch to another game and still be practicing and 
improving your keyboarding skills. And the 
games are deep. 


Deep Typing 

Tripp Hawkins of Electronic Arts has called for a 
new generation of microcomputer programs for 
the average person. To be for everyone, a program 
must be hot (appeal to the senses), simple, and 
deep. 

What Hawkins means by deep is that a pro- 

‘am must be suitable for users at a variety of 
skill levels or for a single user who is acquiring 
new skills and becoming more sophisticated. The 
program must be able to teach a person at one 
level, then it must be prepared to continue teach- 
ing the same person at ever higher levels. 

The QuickFinger programs are deep. They are 
suitable for little children with tiny fingers or high- 
level executives with meaty paws or long painted 
fingernails. They are for hunt-and-peck or swift 
touch typists. They can be your first introduction 
to the computer keyboard or your refresher 
course, even if you already type 50 words a minute 
or more. 

All the QuickFinger programs operate at mul- 
tiple skill levels. You can enter a program at level 
one or level sixteen. Or you can let the program 
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lead you automatically through the levels as your 
skill increases. Your progress is slow but steady. 
If you are having trouble mastering a certain level 
you can hang around until you feel comfortable 
and ready to try something more challenging. 

As you progress the computer keeps score. 
You can save your scorecard on disk and recall it 
easily for later sessions on any of the three programs. 


An Extra Bonus 

Ihave focused only on the AlphaZap program, 
but the other two programs are lots of fun, too. 
Keyboard Pacer shows a picture of the computer 
keyboard on the picture screen. One at a time, the 
letters on the buttons turn black. When you find 
that letter and press it, a new letter turns black. 

This is a good program for even the tiniest 
child or the most fearful adult. You might be able 
to find only one key in two minutes, but if you 
get it right, you are rewarded. 

The last program is called Link the Letters. 
This time you see a grid of fenced-in giant letters, 
like a screen-sized crossword puzzle. You have to 
link the letters into words. When you make up a 
real word, you get points and are rewarded with 
a charming sound like two crystal champagne 
glasses clinking together in a toast. 

Asa parent, | especially like the Link the 
Letters program. It is a good spelling game for my 
children. It helps develop their eye-tracking skills 
(up, down, to the left, and to the right). And it 
teaches them some of the structure of the English 
language, including common word beginnings, 
two-consonant blends, and word endings. It 
makes our language playful. And it helps a child 
learn how to organize words and recognize 
patterns. 


And Now Back To Albert 

The best thing about QuickFinger is that when you 
get tired of linking letters and pacing yourself on 

the keyboard, you can go back and rescue Albert 

Zap again. He’s a nice guy, really. But he doesn’t 
have enough sense to come in out of the rain. 
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Making Calendars 


Paul C. Liu 


Put your printer to good use by making a full 
set of calendars. These four Pacerain will give 
you a screen calendar, a wall calendar, an ap- 
pointment calendar, and one for the year at a 
glance. For the VIC-20 and Commodore 64. 


A practical use for a computer with a printer is 
making your own calendars. Here are four 
calendar-making programs written for the VIC-20, 
three of which require the use of a printer. Since 
the programs are written entirely in BASIC with- 
out PEEKs or POKEs, they will also run on the 64 
and can be easily adapted for 
other computers or non- 
Commodore printers. 

In calendar making, it is 
essential to know the correct day 
of the week for any given date. If 
we let D1 be the day of the week 
(for Sunday D1=1, for Monday 
D1=2, and so on), and let M, 

D, and Y be the month, day, and 
year respectively, D1 can be 
calculated by: 


D1=INT(2.6-(M-2)-0.2)+D+ 
Y-1900+INT((¥ -1900)/4) 

D1=D1+INT(19/4)- 2*19 

D1=D1-INT(D1/7)"7+1 


Two modifications have to 
be used with the above formula- 
tion. For M equal to 1 or 2 we 
have to add 12 and subtract Y 
by 1. In other words, we consid- 
er the months January and Feb- 
ruary as the thirteenth and four- 
teenth month of the previous 
year. In addition, for M equal to 
4 or 9 the calculated D1 has to be 
increased by 1. 


It’s Good For Over 
100 Years 


This algorithm performs flaw- 
lessly for the twentieth and 








twenty-first centuries, up to the year 2100, If you 
really want to be meticulous beyond that, you can 
make further modifications by reducing D1 by 1 
after March 2100, and repeating that every 100 
years. You must do this because the century years 
like 2100 and 2200 which are not divisible by 400 
are not leap years, but the algorithm treats them 
as if they were. 

The programs contain modifications like the 
above to make them accurate for the next five 
centuries, provided, of course, that the current 
calendar system is not reformed. (The last calendar 
reform was in 1752.) 

Once we know the day of the week for the 


Ari The Wall Calendar (Program 2). 
i] 
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The Appointment Calendar (Program 3). 





given date, especially the first day of the month, 
the rest of the calendar-making task is just a matter 
of setting up and getting the proper format and 
display. 


A Monthly Calendar 


Program 1 will display a monthly calendar on the 
screen, In this and the other programs, after you 
load the program, type RUN and press RETURN, 
the computer will briefly explain what the program 
is for and ask you to input the month and year of 
the calendar you wish to see. The numbers should 
be separated by a comma, and the year should be 
the full four digits (1984, not 84), Then the monthly 
calendar of your choice will be displayed on the 
screen. 

Program 2 will give you a copy of what you 
see on the screen in the first program by printing 
it on your printer in enlarged form. This is a long 
program (it requires 8K memory expansion on 
the VIC) because it contains a set of enlarged num- 
bers and characters, together with a bank of sub- 
routines to use them. The result is a calendar you 
can hang on the wall. 

Program 3 also gives you a printed monthly 
calendar, but in a different format. The program 
tabulates the days of the month as a list. It can 
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serve as an appointment calendar for your desk, 
with,room for short notes each day. Along with 
the regular date, you are told what day of the 
year it is. This program RUNs on the VIC without 
memory expansion. 


A Year On One Sheet 


Program 4 will give you all 12 months of the year 
printed on one sheet. The message ‘Happy New 
Year’ is at the top of the calendar, but you can 
puta different short message there by modifying 
the text in line 7. This program also needs no ad- 
ditional memory for the VIC. 

In Programs 2, 3, and 4, after you input the 
month and year as requested, the computer 
prompts you to turn on the printer. Before you do 
this, you should set the perforation of the printing 
paper over the starting position of the print head 
so that the calendar will appear entirely on one 
sheet of paper. The programs are written for the 
Commodore 1515 and 1525 printers, Other printers 
may require modifications to the program. 

See program listings on page 150. @ 
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WITH NIGHT MISSION 


PINBALL 


You deserve the best. You've earned it. Now reward yourself with a session of Night Mission PINBALL, 
the most realistic and challenging arcade simulation ever conceived! = Stunning graphics and dazzling 

sound effects put Night Mission PINBALL in a class by itself. Game features: multi- 
ball and multi-player capabilities, ten different professionally designed levels of play, 
and an editor that lets you create your own custom modes. @ So take a break with 
Night Mission PINBALL from SubLOGIC. Winner of Electronic Games magazine's 
1983 Arcade Award for Best Computer Audio/Visual Effects. 
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“French Tutor’ is a helpful study aid designed 
for those learning or strengthening Frenc 
vocabulary and translation ste english to 
French, or French to English. Written for the 
VIC-20, we've added a version for the Com- 
modore 64. 

Es 


With two children studying French in elementary 
school, one of my reasons for buying the VIC-20 
was to create some French instructional programs. 

“French Tutor’ was suggested by Steve 
Steinberg’s “Language Lab” (COMPUTE, July 
1982), which provided for both drill and transla- 
tion. It was relatively easy to adapt to the VIC, 
with a few minor modifications. For example, a 
dummy word (XX) is needed as the last item in 
the DATA statements to prevent the program 
from running out of DATA if a particular word 
is not in the list. 


Custom Accented Characters 
Another modification involved the use of ac- 
cents, which Language Lab did not include. 
The solution was to create the accents with 
programmable characters, as described in ““Cus- 
tom Characters for the VIC” by David Malmberg 
(COMPUTE!'s First Book of VIC). Program 1 de- 
scribes which keys have to be pushed to obtain 
accented characters. 

In addition to the familiar accented vowels, 
this program includes some which are used less 
frequently—the umlauted é as in Noél, ii as in 
Saiil, and 6 for words of German origin. Also 
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A correct translation is entered in “French Tutor (VIC 
version). 


included are the combined ce for words like 
ceuvre and 2 as in Czesar. 

Program 1 also has a musical signature 
(which could be eliminated if it begins to pall). 


Language Drills 

Program 2, which is loaded by Program 1, is 
made up of four sections: French to English vo- 
cabulary drill, English to French vocabulary drill, 
French to English translator, and English to 
French translator. Because of severe restraints 
on the VIC’s memory in Program 2, there are 
only 101 words, most of which employ accents 
and are no longer than five letters. With more 
memory, this total could be increased. If you do 
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NOTHING BUT THE BEST 





NEUTRAL ZONE. takes you to the outer 
edges of the galaxy, to ALPHA IV, a long range 
early warning station whose mission is to detect 
alien intruders from other galaxies. 





NEUTRAL ZONE» is the ultimate in high 
resolution, fast action, arcade quality games. It is 
written in 100% machine language and features — 
smooth scrolling of the 360 degree panorama. The 
realism is unbelievable. (Suegested retail 
price.. eat 95) 5 
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SPRITEMASTER:s is not just another sprite 
editor. It’s the finest utility available for multicolor 
sprite animation and game programming. It will 
have you making full color animated objects in just 
minutes. People running, birds flying or tanks rolling 
are a snap with Spritemaster. It will automatically 
append your sprites to other programs. It’s easy 
to use and understand and comes with a full 21 page 
instruction manual and samples of animated sprites 
to get your started. (Suggested retail price...$34.95) 
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MASTER COMPOSE 





GENERAL QUARTERS! BATTLE 
STATIONS! As chief commander of land and sea 
forces in the Pacific, your mission is to obtain a 
quick nayal victory, and inyade enemy territory with 
land forces. BEACH-HEAD is a 100% machine 
language game and offers multi-screen action with 
high resolution, three dimensional graphics. 
(Suggested retail price...$34.95) 






» is the perfect utility 
for programming music on the Commodore 64. It 
is fun, easy to use and yery powerful. Master 
Composer takes full advantage of the sound 
synthesizer to produce all types of music from 
simple melodies to intricate compositions. You 
can compose your own musical scores, experiment 
with different arrangements and instruments, 
program your own accompanyment, or just type 
in your favorite sheet music. (Suggested retail 
price...$39.95) 








AVAILABLE NOW AT YOUR LOCAL COMMODORE DEALER 
7X OO) OL 0) OM WA. Oe INC. 925 EAST 900 SOUTH SALT LAKE CITY, UTAH 84105 


(801) 532-1134 


Commodore 64 is a registered trademark of Commodore Business Machines. Inc. 
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Tutor’ also includes French accents and symbols 
sion). 





have more memory, make the corresponding 
change to the number in line 43 (line 1610 in 
Program 3 for the 64) which randomly selects 
the words. 

Additional memory can also be used to add 
more sound, but that will necessitate relocating 
the programmable characters. Also, the random 
selection of words can be changed so that, for 
example, if eight words are chosen, none will be 





Now you can have the memory power of 
the 64, flexible memory control, expansion 


port and more. 


$129.95 
“MOSAIC: 


ELECTRONICS, INC. 
Call for your nearest Mosaic Dealer 
1-800-547-2807, In Oregon 653-7885 
VIC.20b a regtored trademark of Commodore Business Machines Inc. 
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repeated, which is not possible as the program is 
presently written. 

Using the program with a disk drive opens 
up even more interesting possibilities. The four 
sections of Program 2 could be transformed into 
four individual programs, which could then be 
accessed by the menu. The disk drive's speed is 
an asset in jumping from one program to another, 
or to the menu itself. 


Use The Keyword 
Abbreviations 


Memory in Program 2 is at a premium, and no 
extra spaces should be inserted. In order to make 
some lines fit in the maximum 88-character length, 
BASIC keywords should be abbreviated—PRINT 
becomes ?, GOSUB becomes GO followed by 
SHIFTed S, DATA becomes D SHIFT-A, and so 
on. (See Personal Computing on the VIC-20, pp. 
133-34, or pp. 263-64 of the VIC-20 Programmer's 
Reference Guide.) In particular, lines 1-5 and several 
of the DATA lines require abbreviations. 

Don’t attempt to RUN the finished Program 
1 more than twice to see if it works, or you will 
getan OUT OF MEMORY message. SAVE it on 
tape often when creating it, so you can always go 
back to your previous version if this should 
happen. 


Adding Words 


The maximum number of words allowed for each 
Vocabulary Drill section in Program 2 is nine. 
This is because the VIC recognizes only the first 
integer with the GET A$ statement in line 10, 
which doesn’t require the user to hit the RETURN 
key; that is, 20 words would become 2 words. In 
order to increase this number to 10 or above, elimi- 
nate the question mark from line 9, and make the 
following substitution for lines 10 and 11: 


trem 83 
zrem 162 


16 INPUTN:IFN<1THEN1O 
11 IFCO=NTHEN14 


This now requires use of the RETURN key after 
the number is input. 
For the 64 version, change lines 1280-1290 to: 


srem 39 
srem 169 


1280 INPUTN: IFN<1THEN1289 
1298 IFCO=NTHEN1326 


To make the program work with a disk drive, 
give Program 2 the name “F’. Then, in Program 
1, delete line 555 and make the following 
changes: 

398 IFAS="N"THENPOKE36869, 255 :GOTO568 
rem 163 
588 POKE7993,34:POKE7994, 6: POKE7995, 34: PO 


KE7996, 44: POKE7997,56 trem 121 
598 POKE198,1:POKE631,131:END trem 161 


See program listings on page 146. @ 





Look at these 
Features 


@ Fully screen-oriented 


@ Horizontal and vertical scrolling 


@ Terminal mode — never seen before on a wordprocessor 


@ Supports Commodore disk and cassette handling 





@ Imbedded commands 


BLIZTEXT 


WORDPROCESSOR 


FOR THE 


COMMODORE 64 


BLIZTEXT — SUPER WORDPROCESSOR 
for the Commodore-64 
— ON SALE NOW! — 


© Fully screen-oriented, up/down, left and right 
scrolling — Upper and lower case 

© More than 70 commands 

© Full 1/0 compatibility with Commodore peripherals 
Upper and lower case 

© Works with practically every printer on the market, 
user definable printer contro! commands 

© INCLUDE command allows handling large files 
on up to 4 diskettes or on cassette. 

© Build in torminal software for electronic mail and 

networking. Telecommunications mode, upload and 

download, save on disk or cassetto, 

Dynamic formatting, Imbedded commands 

Single keystroke for disk directory and error channol 

Program comes on disk or cassotte 

Double line spacing, left and right margin justification, 

centering, page numbering, and practically everything 

‘one expects from a good wordprocessor. 











AVAILABLE NOW! 
Order #4965 889.00 
Manual only (62 pages) 829.95 
MACROFIRE - 


Editor/Assembler for the Commodore-64 
ON SALE NOW 
AVAILABLE IMMEDIATELY 

‘One outstanding tool, consisting of 3 powerful elements 
combined into one efficient program! 

1.) Fully screen-oriented Editor (more than 70 

commands) 

2.) Very fast assembler with macro capability 

3.) Machine Language Monitor 
Assembly can be started from the editor. Translates in 
3 passes. More than 1,000 lables, screen oriented/no tine 
numbers, scrolling, includes disk files, 
Practically everything the serious machine language 
programmer needs everyday! 
Manual only 
Order #4963 








$19.95 
589.00 








Commodore-64 and 
VIC-20 are trademarks 
of — Commodore 
Business Machines. 


THE GREAT BOOK OF GAMES, VOL.1I, 

by Franz Endo 

46 programs for the Commodore 64 

Introduction to graphics and sound. How to program 
your own games, Walking pictures, animation, high 
resolution graphics, programming tips and tricks, hints 
and useful subroutines for the beginner and advanced 
programmer. This book is a MUST for every C-64 owner. 








‘Come and get it — It’s yours for only 59.95 
Order #182 128 pages 89.05 
Programs from the book on disk. 

Order #4988 $19.95 


MORE ON THE SIXTYFOUR, by H.-C. Wagner 
How to get the most out of your powerful Commodore 
64, Very Important subroutines, tricks and hints in 
machino language for your C:64, How to modify DOS. 
How to connect a parallel and serial printer. How to 
design your own terminal program for communication 
‘and networking. Dig into 1/0 for cassette and disk, 





Order #183 59.95 
Programs from the book on disk 
Order #4989 $19.95 


NEW PRODUCTS 
Watch out for our new books, software and add-ons to 
come soon. ON SALE NOW! -- ORDER TODAY! 
How to program in 6502 Machine Language on 
your C-64_ , by S, Roberts (Introduction) 
Order-# 184 812,95 
Commodore-64 Tune-up, Vol. I, by S, Roberts 
How to expand and customize your C-64, 
Order #185 812.95 
Small Business Programs for the Commodore-64 
by S, Roberts 
How to make money using your C-64, Mailing list, 
invoice writing, inventory, simple wordprocessing and 
much more, 
Order # 186 812.95 
Dealer and Distributor inauiries are invited. 


PAYMENT: check, money order, VISA, MASTER 
CARD, Eurocheck, ACCESS, Interbank 
add’83.60 for shipping (USA) 


id 15 % shipping, Califor- 


Prepaid or 
5.00 handling for C.0. 
All orders outside US; 
nia residents add 6,5 % salos tax, 

















BLIZTEXT is 
trademark of ELCOMP] 
PUBLISHING, INC, 


NEW 
NEW 
NEW 
NEW 
NEW 
NEW 
NEW 
NEW 
NEW 
NEW 


Hardware Add-Ons: 

Parallel printer interface KIT Order #4990 § 19.95 
Universal Experimenter Board Order #4970 5 9,95. 
Expansion Board, space for four ex 

perimenter boards(board only) Order #4992 § 29.95 


Tricks for VICs, No. 176 $9.95 
Universal Experimenter board for VIC $9.95 
fr ; 


Book No,182 $9.95 


NEW Products for tho 
C-64 
SUPERMAILING (D) 
Order No, 4962 $49,- 

Superinventory (D) 
Order-No. 4961 S 49,- 
BUSIPACK 1 (D) 
Ordor-No, 4963 $99, 
SixtyFORTH (D) 
FigFORTH for C-64 
Order-No, 4960 539,— 


For your VIC-20 
Tricks for VICs 
Order-No, 176 89.95 
Universal Experimen- 
tor board 

Order-No. 484469.95 


ELCOMP PUBLISHING, INC 
53 Redrock Lane 
Pomona, CA 91766 
Phone: (714) 623 8314 

Telex: 29 8191 


Book No, 184 


812.95 


Book No.183 69.95 








REVIEWS 


Edumate 
Light Pen 


Dan Carmichael, 
Assistant Editor 


Ina recent poll conducted by 
our sister publication, COMPUTE!, 
only 6 percent of the readers 
indicated they own a light pen. 
In this age of the computer, the 
light pen has yet to catch on. It’s 
unfortunate, too, because the 
light pen can make programs 
both easier to use and fun for 
the noncomputerist. 

One such product is the 
Edumate Light Pen offered by 
Futurehouse. It comes com- 
pletely wired and ready to plug 
into the joystick port of your 
Commodore 64 or VIC-20. Also 
included are an instruction book- 
let and a software package con- 
taining various programs for the 
light pen. 


A Full Demonstration 


The software includes a hi- 
resolution drawing program, a 
disk utility, a music program, 
and a game of 3D Tic Tac Toe. 

Draw Routine lets you draw 
in the hi-resolution graphics 
mode using the light pen. You 
are offered a choice of 16 colors 
(64 version), with options to 
clear the whole screen or erase 
individual lines. 

Disk Utility is a general- 
purpose DOS (disk operating 
system) program which offers 
you a display directory option, 
and the ability to use the light 
pen to select a program, load, 
and runit. You can also initialize, 
validate, or format a diskette, 
display the directory, and scratch 
any files or programs. 
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of their work. 


3D Tic Tac Toe is played on 
four grids measuring four 
squares by four squares each. 
You select the grids and squares 
with the light pen. You win by 
placing an x in four squares hori- 
zontally, vertically, or diagon- 
ally, on one grid or all four. 

Pen Music lets you play 
music by touching the light pen 
to various dots on the screen. 
You're given an array of 12 
notes—a full musical scale—in 
any one of eight octaves. You 
can also use the light pen to select 
changes in decay, and the type 
of waveform you wish to use. 


A Few Restrictions 


While all of the programs are 
usable, they do contain a few 
serious restrictions. 

Only BASIC programs can 
be loaded using the disk utility. 
Because the format LOAD 
“filename’’,8 is used instead of 
LOAD “‘filename’’,8,1, machine 
language programs that do not 
load beginning at location 2049 
(the start of BASIC in the 64) will 
neither LOAD nor RUN. 

The disk formatting option 
does not give you the choice of 
selecting a name for the diskette. 
All disks are formatted with the 
same header: “LPcreate Fil; 

While the music program 
does offer you the option of 


Our artists enjoyed drawing with the Edumate Light Pen. 





Here are two samples 


selecting the waveform and the 
decay setting, you cannot choose 
the filter, volume, attack, or sus- 
tain settings. 

One of the more serious 
restrictions is found in the Draw 
Routine program. After creating 
your drawing, you are unable to 
SAVE it to tape or disk. 


A Good Teaching Aid 


One important point about the 
light pen is its natural ability to 
attract and hold a child’s atten- 
tion. The light pen can be the 
added bonus that keeps a child 
interested in a math or spelling 
program. 

Also, if you're a parent with 
even beginning or intermediate 
programming abilities, you can 
write your own tutoring pro- 

ms. 

In addition, Futurehouse is 
developing several educational 
and graphics software packages 
designed for use with the pen. 

The price of the Edumate 
Light Pen is also a plus. While 
some software games can cost 
$29-$39 or more each, the price 
of the Edumate includes both 
the light pen and the software. 
Edumate Light Pen 
Futurehouse 
Box 3470 
Chapel Hill, NC 
$29.95 


“ph iNeerces 
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In The Chips: 


Playing To Win In Business 


Tony Roberts, Assistant Managing Editor 


An understanding of basic busi- 
ness concepts is a by-product of 
the competition in In the Chips, a 
program from Creative Software. 
The game is available on cartridge 
for the VIC-20, with a Commo- 
dore 64 version forthcoming. 
Playing against either the 
computer or another person, 
you attempt to make the most 
money by developing, manufac- 
turing, advertising, and mar- 
keting a group of products. 
The game involves a series 
of turns in which you and your 








































HUNDREDS OF PROGRAMS AVAILABLE 
a 


All Prices up to 
40% OFF RETAIL 


Commodore 64 


all 


HOME/BUSINESS 


Practical (D) 41.50 
Multiplan (D) 72.95 
Bank St, Writer (D) 49,95 
Smart 64 Terminal 31.95 
Quick Brown Fox (CT) 42,95 
Paper Clip (D) 66.50 
Word Pro/SpellRight (0) 


CalcResult Advanced (D) 
Data Manager (D/CASS) 
Home Acct (Continental) (D) 





Delphi's Oracie (D) 99.95 
CompuServe Starter Kit 29.95 
EDUCATIONAL 

Facemaker (D/CT) 22.95 
Kindercomp (0/CT) 19.95, 
Delta Drawing (CT) 26.95 
Type Attack (D) 28.95 
Early Games (D/CASS) 22.50 
Barron's SAT (D) 59.00 
Snooper Troops #1 (D) 26.95 
Alphabet Zoo (CT) 22.95 
Koala Touch Tablet 72.95 
Mastertype 28.95 


Visa/Mastercard add 3%, Personal checks allow 2 weeks to clear. CA residents add sales tax 
Shipping and handling add $3,00 (hardware extra). Prices subject to change. 
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Write or call for FREE CATALOG. TO ORDER: CALL 1-714-643-1056 
8:00 A.M.-6:00 P.M. PST Mon.-Sat. or send check or 
credit card number, signature and expiration date. Please include phone number. 


CENTURY MICRO PRODUCTS 
RO. Box 2520, Mission Viejo, CA 92690 


competitor each make decisions 
for the following business quar- 
ter. After your plan has been 
entered, the computer lets each 
of you know how you fared. 
Then you go on to the next quar- 
ter, modifying your decisions 
based on the results of the first 
quarter. 


Building A Business 
You begin the game with a 
$100,000 investment in your 
company. Your first move is 
product development. You may 










GAMES 

Choplitter (CT) 28,95 
Lode Runner (D) 25,95 
Enchanter (D) 37.00 
Jumpman (0/CASS) 27.95 
Beach Head (0/CASS) 26.95 
Neutral Zone (D/CASS) 26.95 
Planetfall (D) 37.00 


Star Trek (CT) 





HARDWARE AND ACCESSORIES. 
Cardprint G 71,95 


The Connection Parallel Int 89.95 
Cardco 3 Slot Exp, Board 31.95, 
Cardco 5 Slot Exp. (C-64) 55.95 
Data 20 Video Pak 80 (C-64) 139.00 


Data 20 8K Display Mgr. (VIC 20)119.95, 
OK Display Mgr (40/80) (VIC20) 79.95 
Zenith 12” Green Monitor 102.00 


Zenith 12" Amber Monitor 125.00 
Brother/Dynax DX-15 

(Letter Quality) 485,00 
C Itoh Prowriter 8510AP Call 
Gemini 10x Call 








“In The Chips’ requires the player to 
make decisions involving research and 
development, manufacturing and 
marketing. 


develop up to five products— 
Zurn, Chips, Pipes, Astro, or 
Xatar—at a cost of $5000 each. 
Then you move to your produc- 
tion plant and decide how much 
of each product to manufacture 
ata unit cost of $10. Next, you 
move over to the accounting 
division and set up your pricing 
policies, Last on the list is adver- 
tising. If you have any cash left 
over, spend it here, for unadver- 
tised products don’t fare too 
well in this market. 

The results of your first quar- 
ter depend on the relationship 
between your product line, pro- 
duction, and advertising and 
those of your competitor, If 
you're each selling Chips at the 
same price, the company doing 
more advertising will sell more. 

After examining the ledger 
sheets, you go to work on the 
next quarter, Although you'll be 
in the red after the first quarter, 
you'll be able to use the income 
from first-quarter sales for 
further product development, 
production, and advertising. As 
you make your production deci- 
sions during the second and 
succeeding quarters, the display 
will show you how many units 
of each product you sold and 
at what price you sold them 
during the preceding quarter. 
Understanding and acting on 





this information is essential if 
you hope to avoid bankruptcy. 


Standard Game 


Lasts Two Years 

The length of play in In the Chips 
can be set by the players. A stand- 
ard game is eight quarters (two 
years), though the program per- 
mits games of up to twenty quar- 
ters. An eight-quarter game takes 
about thirty minutes to play. 

The best strategy seems to 
be to spend all of your available 
cash on production and adver- 
tising, and hope that your prices 
are better than those of your 
opponent. Keep in mind that 
the other player is pushing the 
same four products you are. 
This is head-to-head competition 
on the store shelves. 

If things don’t go well for 
you, the game may come to an 
early end when you fall into debt 
and can’t raise enough capital to 
continue production. You'll be 
forced to sell off your inventory 
ata loss and the game will be 
awarded to your opponent. 

Under normal conditions, 
you can’t set prices at below 
production cost. However, one 
option permits you to cut prices 
as much as you like in an attempt 
to corner the market and force 
your competition out of business 
through lack of sales. 


Getting Around The 
Game 

The game is played with a joy- 
stick. You are represented on 
the screen by a construction 
worker-type fellow in blue over- 
alls and a red hardhat. Using the 
joystick, you move him from 
building to building on your 
business site. Once in a building, 
you use the joystick to change 
the numbers on the production 











Comm-File. 


You deserve it. . .so does your Commodore 64!* 


COMM-FILE is a powerful data- © Data Capacity. . . Flexible User- 
base program that eliminates Designed Files and Fields 
multiple data files and turns Complete Mathematical Cal- 
them into one organized and culation Abilities... Powerful 
concise information manage- Search and Sort Control. . . File 
ment system. Offering extreme Merge Capability. .. Advance 
ease of use and tremendous Text Editing Features. ..and 
versatility, COMM-FILE can Custom-Designed Printer For- 
maintain reports, records, form mats. . .all to bring maximum 
letters, invoices, listings, mailing efficiency and effectiveness to 
addresses and any other infor- any business! 

mation vital to your business’ 


proficient operation fa) BYTE” 
COMM-FILE combines Extensive OTE 

ok Se fa P_O. Box 948, Waterbury, CT 06720 
commodore Business Machingss 203-621-9361 











fom rexe)liaWavcelelare| 


The Commodore 64 is your first “real” 
computer. So, it stands to reason that 
the software you use be real too. And, 
useful. 


The INSTA series productivity 
software is just that — real and useful. 


With our tutorial manuals and HELP 
SCREENS we actually teach you what 
word processing, spreadsheets and 
graphs are all about. 


Games are fun....for foolin around. 
INSTA is for real. 


By Cimarron a division 


Commodore 64 is a 
trademark of Commodore 
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and price ledgers in much the 
same way that you add your 
initials to the vanity board of an 
arcade game. It takes a little time 
to understand exactly how to 
move around the board and what 
to do in each building. But once 
you catch on to the rules, things 
g0 quite smoothly. In the Chips 
features a demo mode in which 
the computer plays a game with 
itself. Though the demo moves 
rather quickly, studying the com- 
puter’s moves can help you un- 
derstand the game. 

As an opponent, the com- 
puter seems fairly static, After 
you've played a few times, the 
computer's business plan be- 
comes fairly obvious. Once you 
understand how the computer 
behaves, it becomes relatively 


Int i 


i (i 


| We 


easy to beat it. Though I haven't 
had much chance to play against 
live competition, I find that con- 
siderably more unpredictable 
and challenging. 

Playing the game fairly re- 
quires a bit of self-control on the 
part of both players. You should 
agree not to watch the other 
player set his price and produc- 
tion levels, and you should re- 
frain from studying each other's 
balance sheets. 


Learning About 
Business 

Ina very general sense, In the 
Chips simulates the business 
world. All activity is directed 
toward research and develop- 
ment, production, advertising, 
and marketing. The control you 


onoess oul “B00-638-2617 » 


Information and in Ohio 1-216-758-0009 


1541 Disk Drive 
530 Datasette 
526 Printer 100 cps. 


$219 
-$ 59 1600 Modem.... 


$289 1520 Printer/Plott 


Sat 10am 5 pm 


1702 Color Monitor 
$ $9 1525 Printer 30 cp: 
$159 1650 Auto Modem. 


COMMODORE 64 $219 


WORD PROCESSING 


ZORK 1, IIL 
‘Suspended, 

Easy Cale. 

Easy Finance 1,11,111,1V,V 


Word Pro 3+ 


Mirage Concept: 


DATA BASE MA UAGERS 


Delphi's Oracte.. 
Accounts Recel 
Accounts Payabl 


HOME FINANCES 
Home Accountant. 


BMC composite col 

PRINTERS. 

Gemini 10X with Cardco 
interfac 

Gemini 15X. 

SPECIALS 

Koala Pad Touch Tablet 


th speller 


Smart 64 Terminal 
Micro Pak Paper, 
Disk File 70., 


ise exchanged for same product only. Shipping edd 3% ($2.60 minimum). Ohio customers add 5.5% sales tax. Prices & | 


evaitability subject to change, 
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have in each of these areas is 
whether or not to spend money, 
but the game makes no attempt, 
to cover the nuances and subtle- 
ties that exist within each of these 
areas. 

However, In the Chips does 
illustrate the relationships 
among pricing, advertising, and 
sales, and can be used to dem- 
onstrate these concepts. But it 
must be understood that there’s 
more to business than is por- 
trayed here. 

The financial summary pro- 
vided at the end of each quarter 
contains plenty of grist for a dis- 
cussion about the ways of busi- 
ness, The summary includes two 
parts: the balance sheet and an 
income and operating statement. 

The balance sheet shows 
how much cash you have, how 
much capital is tied up in inven- 
tory, your investment, and fi- 
nally, the bottom line. 

The income and operating 
statement details the activities of 
the preceding quarter. This state- 
ment displays the amounts spent 
on advertising, production and 
development, and the amount 
earned in sales. Expenses are 
displayed in red and earnings in 
blue, graphically demonstrating 
income and outflow. 

In the Chips is an entertaining 
game, and it’s designed to be 
educational. It cannot be played 
successfully without first under- 
standing the concepts involved, 
then thoughtfully applying 
them. But for anyone old enough 
and interested enough to learn a 
bit about business, In the Chips is 
a painless way to do it. 
In the Chips 
Creative Software 
230 East Caribbean Drive 
Sunnyvale, CA 94089 
(408) 745-1655 
$29.95 





Beach-Head 
For The 64 


Shay Addams 


Most computer war games in- 
volve moving little units of your 
army around a grid super- 
imposed on an onscreen map— 
not the most action-packed way 
to fight a war. Beach-Head, how- 
ever, puts you right in the thick 
of things, facing enemy ships 
and planes head-on. It’s a one or 
two-player game whose object is 
to win a naval victory, then move 
inland to knock out the enemy 
fortress of Kuhn-Lin. There 

are six different phases in the 
campaign, each presented with 
finely detailed and colorful high- 
resolution graphics. 

As the game begins, you get 
an overhead view of your ten- 
ship fleet, represented by four 
white dots floating in the ocean. 
On the left, a long stretch of 
beach reveals a narrow entrance 
to the bay. The fortress can be 
seen blinking in the lower-left 
corner, and the enemy fleet lies 
at anchor in the harbor. 

Your first decision is strate- 
gic: Steam straight into the har- 
bor, or try to sneak up on the 
enemy by approaching through 
a secret passageway into the 
bay, located further up the 
coast. 


Guide The Fleet 
Through Mines And 
Torpedoes 

If you steer your fleet into the 
hidden entrance, another screen 
appears to show a wide, round 
underground lake strewn with 
mines. You must maneuver your 
ships one by one across the lake 





Tired of playing games? 
Learn to program with. . . 


\ Sax 
ASIC |. 





A TUTORIAL. 


On your Commodore 64* 


BASIC, A TUTORIAL introduces 
you to the essential elements of 
programming your Commodore 
64 in the BASIC language. Every- 
thing from keywords and state- 
ments to data handling and 
printing... .and so much more! 


both at and away from the 
computer. And, each BASIC pro- 
gramming technique is followed 
by interactive, short examples 
for further understanding of the 
BASIC language in use 


BASIC, A TUTORIAL helps you 
truly understand and use your 
computer to its fullest, Isn’t that 
more challenging than ‘just 
playing games’! 

For more detailed information 
and the dealer nearest you, 
write or give us a call. 


Although a serious program for 
those serious about computers, 
BASIC, A TUTORIAL makes 
learning fun for even the young- 
est computer “whiz” through 
imaginative graphics and hands- 
on programming experience. 
Each BASIC lesson is presented 
on the monitor screen and in the 
manual for self-paced learning 


P.O, Box 948, Waterbury CT 06720 
203-621-9361 


"Commodore is a registered trademark of 
Commodore Business Machines, 














We know. You've been ook ty 
everywhere for 64 software, INSTA's 
interactive line of software is just a 
phone call away. 


Imagine, specially designed software 
that “talks” to one another. Your home 
budget created with CALC instantly 
becomes a GRAPH. And your club 
membership list with addresses and 
monthly dues quickly becomes a form 
letter, printed over and over again, 
automatically, for each member. 


So, no more lookin’ around. INSTA is 
here now! 
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and out the exit at the upper-left 
side of the screen. This isn’t as 
easy as it sounds, because enemy 
torpedoes zip across the lake 
erratically. But you'll face fewer 
enemy planes in the next phase 
by taking this tack. 

Either way, your ships enter 
the harbor, where the display 
changes to a first-person “you- 
are-there” scene: A huge aircraft 
carrier and four other enemy 
ships are seen at fairly close 
range. 

Propeller-driven fighters 
take off from the distant carrier, 
and the droning of their engines 
gets louder as they approach. 
Appearing first as tiny dots on 
the horizon, they quickly grow 
into finely detailed planes that 
spit machine-gun fire from their 
wing tips, then veer off authen- 
tically instead of passing over- 
head. The only evidence of your 
own weaponry are the tips of a 
pair of barrels whose elevation 
and horizontal positioning can 
be controlled with the joystick. 


Unparalleled 
Animation 


The three-dimensional sensation 
achieved in this sea-to-air battle 
is unparalleled. It’s almost like 
being in the middle of a John 
Wayne movie. Another unusual 
effect involves the trajectory of 
your gunfire. The shells don’t 
blast a straight line to the on- 
coming target, but describe a 
true arc, rising and falling ina 
smooth motion. When an enemy 
plane is hit, the explosion looks 
like comic book art rather than 
the flashing bursts typical of 
most games. 

Each plane that manages to 
get past you does a little damage 
to one of your ships. The current 
damage is displayed at the bot- 
tom of the screen, and when it 
reaches a certain level, one of 
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An enemy fighter is shot down in the 
opening scenes of Beach-Head. 


your ships will be destroyed. A 
red surveillance plane flies over 
occasionally; it’s worth 1000 
points. Shoot down enough 
enemy planes, and the carrier 
tries to escape by sailing off the 
left side of the screen. 


Calculating Your 
Broadsides 

This brings up the ship-to-ship 
battle. The shrill whistling of 
incoming shells alerts you before 
they hit, sending up tall white 
plumes when they splash in the 
water. After you fire a shot, sev- 
eral seconds elapse before it 
smashes into a ship or lands in 
the water. You can’t fire another 
shot until the first one lands. At 
the bottom, a read-out displays 
your guns’ current elevation. 
When one of your shells hits, a 
little range finder tells you how 
close you were to hitting the 
other ship. 

It might say 10.5 degrees 
long” for instance. Each time the 
joystick is pushed forward, the 
guns are elevated half a degree. 
This means you have to do some 
quick mental calculations to de- 
termine how much to change 
the guns’ elevation on the next 
shot. Pressure builds while 
you're trying to subtract 10.5 
from a current elevation of 77, 
but it’s worth it when you see 
the enemy ship sink slowly be- 
neath the waves after you score 
a direct hit. 


Attacking The Beach 


Sink all the ships, and the over- 
head view reappears so you can 
steer your fleet to the beach. 
This scene puts you in the 
driver's seat of a small tank that 
must weave through a series of 
closely placed walls and mines 
while you blast away at gun 
emplacements. The higher your 
score when you reach this scene, 
the more tanks will be lined up 
as reserves. 

Once in motion, you can’t 
turn back. The scenery scrolls by 
and there’s no way to change 
your speed, It’s a do-or-die situ- 
ation. Make it across the beach 
and you'll face the Kuhn-Lin 
fortress and its unerringly accu- 
rate cannon. 

It sits atop a big brown hill, 
where you immediately see a 
small white window. You have 
to puta shot through it. It turns 
black when you hit it, then 
another appears. Ten windows 
must be hit in order to demolish 
the cannon, which slowly aims 
down at you while you're 
popping shots at the windows. 
It never misses; the only way to 
nail it is to rely on a force of sev- 
eral tanks, each of which must 
hit several windows. 

The sight of the cannon 
exploding and a little white flag 
waving from the remains of the 
fort is another visual plus that 
makes this shoot-em-up one of 
the best of its kind for the Com- 
modore 64. You can choose from 
four skill levels and save high 
scores to the disk, and the pause 
feature is convenient when you 
want to call a temporary truce. 


Beach-Head 

Access Software 

925 East 900 South 

Salt Lake City, UT 84105 
(801) 532-1134 

$34.95 


If you want to stay ahead of the personal computing 
revolution ... 
... welcome to COMPUTE!'s PC & PCjr! 
This exciting new magazine from COMPUTE! takes 
you inside the PC and the incredible new PCjr to bring 
you inside information you'll find nowhere else. 

You'll discover how to get the most computer power 


for your money. At home. At school. At work. With easy- 


From the publishers of COMPUTE! 


Announcing 
the magazine 
that fakes you 
inside the IBM 

PC and the PCjr. 


COMPUTE!s 


to-run programs. Challenging 
projects for advanced users. 
Brand new sound and graphics 
applications. Plus some of the 
most exciting computer 
functions outside of the top- 
secret research labs! 

We'll help you decide what 
to buy. With independent 
evaluations of hardware, 
software and_ peripherals. 
Comprehensive reviews of 
new products as they're intro- 
duced. Hard-nosed evalua- 
tions of each machine's 
strengths and weaknesses. 

COMPUTE!'s PC & PCjr 
will keep you on the leading 
edge of personal computing 
like no other publication can. 
Here are some of the features 
you can look forward to: 
Welcome to the PCjr! A com- 
plete introduction to IBM's 
newest personal computer, _ 





to trade-offs to ultimate success, 


Telecomputing with Your IBM. How to link up with dis- 
tant computers over ordinary phone lines, access infor- 
mation services, even do office work at home with your 
own machine! 


Music and Graphics. How to play songs and create 
sound effects with your PC or PCjr. Programs to gener- 
ate impressive hi-res graphics and computer animation, 
Your First Hour with an IBM. 
How to avoid those opening 
night jitters and get your com- 
puter up and running fast! 
Financial Analysis. Ready-to- 
run programs to help you 
make intelligent investments. 
PC vs. PCjr. Which one is right 
for you? COMPUTE!’s PC & 
PCjr helps you decide! 
PLUS; Programming the func- 
tion keys to suit you. Speeding 
up BASIC without resorting to 
machine language. Tape, disk, 
or hard disk? Buyer's guides, 
How to take advantage of 
free public-domain software. 
Computing activities for the 
whole family. Reviews. Games. 
Educational programs for 
children. And much, much 
more! 

Subscribe right now and you 
can enjoy special Charter Sub- 
scriber Savings on COM- 











and a fascinating peek at the 
8088 microprocessor — the 
tiny-but-talented brain of 









PUTE!'s PC & PCjr — just $24 
for, nthe first 12 big issues. That's 





PCjr. 

Designing PCjr — Thi 
Story. PCjr’s creato rs 
they designed i f 


Oth it 


er pri 
What's more, I rege 


pro-rata refund. 
MAIL TO: 
CO 


P.O. Box 974, Farmingdale, NY 11737 










33% Rue cover price! 
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REVIEWS 


Lunar Leeper And 
Cannonball Blitz 


Harvey B. Herman, Associate Editor 


I trust that I’m not repeating 
myself too much when I say that 
the real advantage of owning a 
VIC-20 is that you get a real com- 
puter which can also play super 
games. I thought it was a bargain 
at $300 when it first came out; 
now at about $70, it is a steal. 
Any disadvantages—a limited 
memory and a 22-column screen, 
for example—are outweighed by 
its capabilities. 

Recently, I received two 
more cartridge games to add to 
our growing collection. My kids, 
and to a lesser extent the adult 
kids (my wife and I), have had 
a lot of fun with what I have 
dubbed the second generation of 
VIC games. (The first generation 
was largely pedestrian.) 


Lunar Leeper 
“Leepers are cute, 
Leepers are sly, 
It’s a game full of dodging 
to shoot up an eye. 


Fly up and fly down 
Forward and back, 
Rescue your men 
before Leepers attack.” 


The first two stanzas of the 
poem on the cartridge box cover 
neatly summarize this fast game. 
Your joystick controls a space- 
ship. Your mission: to score 
points by bringing men to safety 
ona cliff and destroying an evil 
eyeball. 

Sounds easy, but of course 
it’s not. In level one, you must 
evade one-eyed, froglike crea- 
tures (lunar leepers) which are 
jumping at your ship and shoot- 
ing at you. They will eat you and 
your men if you are not careful. 
When this happens, you are 
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literally sucked into their heads 
to the accompaniment of appro- 
priate sound effects, 

What makes the game diffi- 
cult to master is that the speed 
and direction of your ship are 
controlled by the joystick, with- 
out benefit of brakes. You must 
keep your eye onan inertia meter 
or you might be moving too fast 
to pick up a man. Furthermore, 
you must keep an eye on your 
fuel gauge so you can refuel be- 
fore your fuel runs out and you 
crash. 

This game has features that 
we like to see in all games. It 
offers a choice of starting levels 
and a pause control. You keep 
moving up in difficulty when 
you have rescued all your men 
or shot all the leepers. There is 
variety. For example, level two 
is completely different from level 
one. In level two you find your- 
self in a cave containing a giant 
eyeball which must be destroyed 
while you dodge the eyeball 
protectors. There is little room 
for error in this convoluted maze. 
A good score requires lightning- 
fast reflexes and little time for 
thinking. 

Lunar Leeper, which is also 
available on cartridge or disk for 
the Commodore 64, is an excel- 
lent game. 


Cannonball Blitz 


“Cannonball Castle, fortress of 
the enemy redcoats, sits high 
atop Nutcracker Hill. It is your 
mission, as a rebel soldier, to 
climb Nutcracker Hill and de- 
stroy the castle. Not so fast, 
though—there are many traps 
and obstacles ... a constant rain 
of cannonballs could cause a 





The ship has rescued a crew member, 
but cannot reach the fuel pod. 


fatally large headache.” 

The above blurb (from the 
package) is descriptive of the 
game. You want to get up to the 
top, but the Redcoat, kicking 
rolling cannonballs at you, has 
other ideas. 

The game commences in- 
nocuously enough with a 
serenade of “When Johnny 
Comes Marching Home.” Then 
the balls come rolling down at 
you and you don’t have much 
time to think. You can jump 
over them if you’re quick, or you 
can use falling cannonballs and 
a seesaw to propel up one vertical 
level. A balloon helps you ascend 
the final step to the Redcoat’s flag. 

Like other good games, it 
has a choice of levels. If you man- 
age to reach the top and capture 
the flag, you listen to a victory 
song (“This Old Man,” for ex- 
ample) and move up a level of 
difficulty. Points are scored by 
jumping over cannonballs, and 
at higher levels, by striking can- 
nonballs with a hammer. 

I found the game very diffi- 
cult and never passed level one. 
So did my kids at first, but now 
one of them claims he has mas- 
tered it and can win almost every 
time. Keep that in mind if you 
have expert players who bore 
easily once they get the knack. 
Lunar Leeper 
Cannonball Blitz 
Sierra On-Line Building 
Coarsegold, CA 93614 


(209) 683-6858 $29.95 each @ 
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TOM R. HALFHILL, FEATURES EDITOR 


> 


Each month, COMPUTE!'s GAZETTE will tackle some 
questions commonly asked by new VIC-20/Commodore 
64 users and by people shopping for their first home 
computer, 





Qa. What is the meaning of the decimal num- 

bers in BASIC 2.0, BASIC 5.1, etc.? Do the terms 
“extended BASIC” or “enhanced BASIC” have a 
real, definable meaning? Or are they mostly ad- 
vertising puffery? 


A. In computerese, decimal numbers tacked 
onto names of products—usually programs—in- 
dicate the current version of the product. In other 
words, they denote the product's current state of 
revision. A word-processing program named 
WordMangler 2.2 is a more current version than 
WordMangler 1.5. The higher the number, the 
later the revision. 

As far as I've been able to determine, there 
aren’t any formal rules governing the use of these 
numbers. Logically, you would think that the 
first version of a program would always be labeled 
1.0, right? But often new programs appear on the 
market with a postscripted 2.0 or even 3.5. Ap- 
parently the earlier-numbered versions were not 
fit for public consumption and never made it out 
of the programmer's workshop. 

In lieu of formal rules, a few general conven- 
tions seem to be followed. If a revision is more or 
less minor—to fix a small bug, for example—the 
number is incremented by only a fraction, such as 
2.0 to 2.1. But if major changes are made—perhaps 
to incorporate significant new features, or adapt 
the program to another computer—the number is 
moved up a whole notch, such as 2.0 to 3.0. 

The same conventions are followed when 
numbering programming languages such as 
BASIC. (BASIC itself, of course, is just a large 
program written in machine language.) You've 
probably seen these revision numbers when 
writers refer to various versions of Commodore 
BASIC. The very first Commodore computer, the 
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SIMPLE ANSWERS TO COMMON QUESTIONS 






PET (Personal Electronic Transactor); came out in 
1977 and had a version of BASIC known today as 
Original ROM BASIC (so named because the 
BASIC was stored in ROM—Read Only Memory). 
Later, this BASIC was revised and became known 
as Upgrade ROM or BASIC 2.0. The BASIC lan- 
guage built into the VIC-20 and Commodore 64 is 
essentially BASIC 2.0, 

Improved models of the PET, known as the 
4032, 8032, and SuperPET, have an even better 
version called BASIC 4.0. Among other things, 
this BASIC has more efficient garbage collection 
and built-in disk commands. Compare these two 
procedures for deleting a file off a diskette in disk 
drive 0. 


In BASIC 2.0: 


CLOSE 15:OPEN 15,8,15,“SCRATCHO:filename”: 
CLOSE 15 


In BASIC 4,0: 
SCRATCH “filename” 


What's more, BASIC 4.0 even asks, ‘Are you 
sure?” before going ahead and scratching the file. 
That's where the terms ‘extended BASIC” or 
“enhanced BASIC” are applied. In effect, BASIC 
4.0 is an extended or enhanced version of BASIC 
2.0. It’s easy to see how extended commands can 
make a computer easier to use. 

Unfortunately, there are no absolute, defin- 
able meanings to the terms “extended” or “en- 
hanced’ when applied to various BASICs. Pre- 
sumably, these terms indicate that the BASIC 
does indeed have more advanced commands, but 
remember that one computer's extended BASIC 
may be no better than another computer's stand- 
ard BASIC. For example, the extra sound and 
graphics commands found in many extended 
BASICs sold for the VIC and 64 are built into the 
regular BASICs in some other home computers. 
To avoid being misled by advertising puffery, ask 
to see a list of the extra commands so you can 
judge for yourself. If possible, try out the com- 
mands before buying the BASIC to see how useful 
they really are. @ 


AT LAST! A REAL FLIGHT SIMULATOR!!! 
— From The Creators of HELLCAT ACE! 


A real flight simulator allows you the pilot to accomplish Takeoffs, 
Landings, Cross-Country Navigation, and Emergency Procedure practice 
under Clear (VFR), Cloudy (IFR), and Cross-Wind conditions. SOLO 
FLIGHT is such an advanced simulation that uses realistic three 
dimensional terrain graphics, actual configuration instrument panel, 
multiple air navigation maps, and accurate aircraft performance 
characteristics to provide the challenge, thrill, excitement, and joy of the 


flight experience!!! 
Three:Dimensional « Takeoffs 
Ti in Graphi 
‘errain Graphics ee 


* Cross-Country 
Navigation — Day, 
VER and IFR 
Flying 


Multiple Airports 
and Runways 


Dual Radio Naviga- 
tion Instruments 


» Emergency 
Procedures Practice 


Air Mail Delivery 


Full Feature, Actual Game for 1-4 Players 


Configuration 


» Smooth Landing & 
Instrument Panel ig 


Good Navigation 
Scoring 


Multiple Air 
Navigation Charts 


* For All Atari and 
Commodore 64 
computers, disk or 
cassette... $34.95 


* Coming Soon for 
IBM-PC 


Instrument 
Approaches 








Look for MicroProse’s two new exciting real time combat simulations — MIG ALLEY ACE & NATO COMMANDER. 
Write or call for our Free Catalog. 


If you cannot find our games at your local stare, you can order by MasterCard or VISA, Money Order, 
COD or Check. Add $2.50 tor Postage and Handling. Maryland Residents add 5% Sales Tax. 


cy 0616 Beaver Dam Road, Hunt Valley, MD 21030 
Microlerose Soltware Y; Z (301) 6671151 


DEALER INQUIRIES INVITED. ATARI th 
Cominodore 64 i he pegiseved traemark ot Ct 
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THE BEGINNER’S CORNER 


C. REGENA 


MATCH-EM 


A question I am often asked is how to convert pro- 
grams for one computer to versions for another. 
Although published program listings for the VIC 
and 64 were at first sparse, they aren’t anymore. 
The need for conversion is less important. However, 
you sometimes find a program written for another 
computer that you wish you had for yours. 

Conversion isn’t that difficult, The main BASIC 
commands are the same for most all microcom- 
puters, and the logic is the same. The major differ- 
ences in the programming commands for micro- 
computers are the sound and graphics commands. 
Each brand of computer requires a special method 
of programming sound and graphics. I have found 
it easier not to strictly convert these commands, but 
to rewrite sound and graphics for each particular 
computer. 

Thave had quite a few requests to convert 
“Match-Em,” originally published for the TI-99/4A 
in the April 1983 issue of COMPUTE!. Here it is for 
the VIC and the 64. 


How To Play Match-Em 


Match-Em is a simple matching game designed 
for young children. The screen displays 16 
squares, each with a different letter. Press the 
letters on two of the squares to try to match the 
shapes hidden behind those letters. If you suc- 
cessfully ‘‘match-’em,” the shape will be drawn 
at the bottom of the screen, and you will not be 
able to use those squares again. If you choose a 
square which has previously been matched, in- 
stead of a shape you will see rows of X marks. 

There are eight pairs of shapes to try to match, 
The game is over when all eight pairs have been 
discovered. The object is to score as low as pos- 
sible—you get one point for each guess. 

If you wish to stop the game at any time, 
press Q to quit. The placement of all the shapes 
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The goal is to find the matching pairs in ““Match-Em,"’ for 
the VIC and 64. 


will be shown. After each game you have the op- 
tion of trying again. If you press Y for yes, the 
shapes are scrambled in a different order, and the 
score is reset to zero. If you press N for no, the 
program ends. 

Feel free to change the graphics. I used some 
shapes made up from the graphic shapes on the 
fronts of the keys. You can get fancy and create 
sprites on the 64 if you wish. And you can make 
up different designs or even animals to match. 

The principles of a matching game are the 
basis for many educational games. You can use 
the same general logic to develop matching games 
for a variety of subjects. For example, instead of 
shapes you could match a capital letter with a 
lowercase letter. Try matching a picture with its 
beginning letter. Match parts of compound words, 
or perhaps homonyms, antonyms, or synonyms. 
In geography, match states and capitals or, 


Food for Thought. 


Inventory 64." An easy-to-use 
menu-driven program that lets you 
track complete and complex invento- 
ties. Pinpoint locations, vendors, 
units of measure, Update prices, re- 
orders, sales, entire stocks. A power- 


Real computing at appetizing prices. 


64 PAK-" A self-teaching sampler 
package of 10 menu-driven programs, 
\deal as an introduction to computing 
Or compute your life expectancy, 
your mortgage payments, even learn 
the language of the deaf, plus a lot 
more, Only $19,95* on tape; 

$24.95 on disk, 


ful tool for your home computer at iY 


only $29.95" on disk _— M a) We 
NV ENO ie 


pimp ane 


COMPUTER SOFTWARE ASSOCIATES 


' PractiC 
64 


ALC 


PractiFile!* A fully professional file 
manager for your Commodore. 
PractiFile can handle mailing list 
entries by the thousands, You can 
change records, numbers, methods 
of fling, and a great deal more. Plus, 
it's easy to use, Only $54,95' on disk. 


Total Health” The {un way {o keep 
fit. Stay on top of your daily intake 
and outgo of calories, Balance your 
daily diet and graph your progress — 
all tailor-made to your body, past, 
present, and future. It's like having a 
health spa in your home for only 
$24.95' on tape; $29.95"on disk. 


PractiCalc™ 64, The most powerful 
spreadsheet available for a home 
computer—at the least cost, Track 
investments, inventories, expenses, 
Project profits. Make charts. Keep 
mailing lists. Sort alphabetically or 
numerically, instantly. An incredible 
value at $49.95" tape; $54.95" disk. 





Now you can do real, honest-to-goodness computing at computer-game prices. Computer Software 
Associates brings you hard-working software that makes your work easy. (While it's easy on your budget.) 
All programs are easy to work with right on the screen, rom Sel teaching instant software that tracks your 
vital statistics to potent programs to track inventories and profits. 

Of course, if it's games you want, we've got them too. But if you're look- a COMPUTER 
ing for home computer power with real brainpower, look no more. Now SOFTWARE 
you can play for keeps. SQW ASSOCIATES INC. 
Exclusively distributed by Micro Software International, Inc. + The Silk Mill, 44 Oak St., Newton Upper Falls, MA 02164 « (617) 527-7510 


*Prices are suggested retail; actual retail prices may vary, ©1984 Computer Software Associates, Inc, Commodore 64™, trademark of Commodore Business Machines, Inc. 


perhaps, rivers with countries or countries with 
continents. In history, match a date with a histor- 
ical event. In mathematics, match a problem with 
its answer. 


How The VIC And 64 Versions 
Work 


I first wrote the 64 version of this game, then com- 
bined lines and changed the graphics and sound 
commands for the VIC version. To aid my program 
explanation, I kept the VIC line numbers consist- 
ent with the 64 version, 

Line 1 defines the border and screen color 
combination, clears the screen, and defines the 
printing color. 

Line 10, a DIMension statement, is used to 
reserve array space for 16 elements each in A, B, 
C, and P. A and B keep track of the eight shape 
numbers. C is the color number for a particular 
square on the screen. P is a position number used 
in drawing the graphics for a particular square. 

Lines 20-80 print the title screen and instruc- 
tions. Line 90 reads the values for the position 
and color of each square from the data in lines 
100-130. In line 140, CC is defined as a number 
that relates the screen memory map with the color 
memory map. A$ and B§ are used to print the 16 
red and blue squares. 

Lines 150-160 turn on the sound and define 
variables used to play sounds—a beep to signal 
the player's turn to press two letters, an “uh-oh” 
sound for no match, and an arpeggio for a correct 
match. 

Lines 170-180 wait for the player to press the 
fl key to start the game. To type this line, press the 
fl key between the quotes in line 180. You may 
choose a different key to be pressed if you prefer. 

Line 190 clears the screen, and in the 64 ver- 
sion line 200 changes the screen to white. Lines 
210-230 print the red and blue squares on the 
screen. Line 240 prints the letters on the squares, 
then line 250 prints the Q option. 

Lines 260-300 are my way of arranging the 
shapes. Each of the shapes is numbered from 1 to 
8. The B array can be considered a screen with the 
shapes in order (1-2-3-4-5-6-7-8-1-2-3-4-5-6-7-8). 
The A array is formed by choosing one of the B 
elements randomly. After a B element has been 
chosen, it is set to zero so it cannot be chosen 
again. Line @= redefines the B array to be 
the same as tffe’A array. If the player presses Q or 
ends the game, the B array is used to see the orig- 
inal position of all the shapes. 

Lines 310-330 define random colors for the 
shapes, making sure the shape color is not white, 
red, or blue. The score (SC) and number of correct 
shapes (S) are initialized to zero. S is used to de- 
termine the position to print the shape at the bot- 
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tom of the screen when it is correctly matched. 
Line 340 POKEs color onto the screen where the 
score will be printed. 

Line 350 prints the message to press two let- 
ters, Lines 360-370 increment and print the score 
at the bottom right corner of the screen. Lines 
380-390 create a beep to indicate to the player that 
it is time to press two letters. 

Line 400 scans the keyboard to see which 
letter the player presses. If no key is pressed, the 
POKE statements blink the dash for the letter on 
the screen. Lines 410-420 make sure that the letter 
pressed is between A and Q and that all other 
keys pressed are ignored, The letter pressed is 
printed on the screen, replacing the dash. R1 is 
the first letter pressed, and R2 is the second letter. 
Line 430 has the computer branch if the letter Q 
has been pressed. 4 

Lines 440-470 print the shape corresponding 
to the square chosen. If the square has previously 
been matched, A will be zero and X marks will be 
printed instead of a shape. In line 470 the ON- 
GOSUB branches to the appropriate subroutine 
to draw the particular shape. GOSUB 780 colors 
the shape. 

Line 480 sets the position for the second dash, 
then line 490 blinks the dash while waiting for the 
second letter to be pressed. Lines 500-570 are 
similar to lines 410-470, which print the shape of 
the second letter chosen. 

Lines 580-640 play the “uh-oh” sound if a 
match is not made. Lines 650-680 play an arpeggio 
if a match is made. Lines 690-700 print the shape 
at the bottom of the screen, then line 710 sets the 
A elements to zero so they cannot be matched 
again. Line 720 branches if all eight shapes have 
been matched and the game is over. 

If the game is not over, line 730 waits until 
the player presses the space bar to continue 
playing. Then lines 740-760 “cover’’ the squares 
and replace the previous letters with dashes so 
line 770 can branch back to the beginning of the 
choosing procedure. 

Lines 780-800 contain a subroutine to color 
the shape after it has been drawn. A subroutine 
in lines 810-840 replaces the shape on the screen 
with its original red or blue square and cor- 
responding letter. Lines 850-1070 contain the 
subroutines to draw the eight shapes. 

Lines 1080-1100 contain the procedure if a 
player has correctly matched all eight shapes. The 
message to press two letters is cleared, then some 
random tones sound to signal the end of the game. 

If a player presses Q or if the player has 
matched all eight shapes, lines 1110-1130 show 
all the shapes for the 16 positions on the screen. 
Lines 1140-1170 print the option to try again, and 
the program branches appropriately. 

See program listings on page 140. @ 
















































































RS232 Adapter 
for Commodore 64 








°F 








Tho JE292CM allows connection of 
standard RS232 printers, modems, 
ote, to your C-64, A 4-pole switch 
allows the inversion of the 4 control 
ines. Complete installation and oper- 
ation Instructions included. 


+ Plugs into Usor Port « Provides Stan- 





dard S232 signal levels Uses 6 


signals (Transmit, Receive, Clear to 
Sond, Request to Send, Data Terminal 
Ready, Data Set Ready) 


JE232CM...... $39.95 
for Commodore 64 













































































|-{ JE520 Series 


VOICE SYNTHESIZER 
FOR APPLE AND COMMODORE 


Add speech capability to your Apple Il, I+, /e*, 
[| Commodore 64 or VIC-20 computer with JAMECO’s 
| | JE520 Series Voice Synthesizer. Speech — the most 
effective means of communication available to man 
— is now immediately available for your computer. 


("| = 











GAME PADDLES 





JSD Atari 

Driver (Single). . ... $2.95 
JSP Atari 

Paddle (Double)... . $2.95 
CSP Commodore 
Paddles........... $4.95 


T-]_ Applications 
|_| +Education + Entertainment 
+ Games + Telecommunications 


+ Instrumentation 
+Handicap Aids 


JES20 Features 
“More than 260 basic words, prefixes and sutfixes, which allow 
well over 500 total words. 


1-1 the formation 
+ Allows music 
+ Programs in 





Very understandable and realistic maie voice. 
[7] Bullin ampiiier speaker, volume contro! and 
audio jack 
+ Plug-in user-ready with complete documentation 
and sample sofware 





‘The JE520 will plug right nto your computer and be, 
talking in minutes. it produces a very clear, 
natural male voice. The outstanding speech 
quality is produced using National Semi- 
‘conductor's Digitalker'™ spoech processor 
IC with 4 custom mamory chips. 











JES20AP 
Coming soon: Case Size 
F]_emelegrgenson'o Je5s20CM TUX Wx tH 
JE520CM For Commodore. -$114.95 





JES20AP For Apple $149.95 












































QUALITY COMPUTER PRODUCTS 


FOR APPLE AND COMMODORE 
Jameco’s 10th Anniversary 1984 Catalog is Now Available 








L CABLES 
I RS232 Type 
ty _lee_hiee 
y 4 $1395 
[ 4 1649 
Loo a 
tw 1889 















































































































































































IBM PC Parallel Printer 
Adapter Type 


(C0025 Male to Centronics Mae) 











+] art ko, Length Price 
1] copasr-s-ceNg6M 8 $1795 

(COB2S-15,CENS 1s 2295 
1 Style J Male to Male 


++ tye L Male o Female 








We stock over 200 oiferent cables. you doit 
‘See what you need, please call 

















5%" Diskettes 


80-Column plus 64K RAM 
































$800 = Single Sided Double Density i 
SDD = Double Sided Double Density for your APPLE /le’ 
| ULTRA MAGNETICS . 
PartNo. Description Boxed Price 
UMS1407 S800 win Hub Rina 10 2405 
_ UMs2401__DSDO wih Hub Ring 103298 
SK (ESKE!) 
f SKID 8800 with Hub Ring 10 $20.95 
Sk2D SOD WiInHudRing 1026.08. 








‘Al diskettes aro soft-soctored and have hub rings, Bulk 
prices available on request 























For: Apple I, 1+ and fo® 


‘Alar 


Commodore 64, ViC-20 


IGMPC, PC Je, 
































inl 














$10.00 Min. Order - US. Funds Only 
Calif, Residents Add 613% Sales Tax 
Shipping « Add 5% plus $1.50 Ins. 


‘Send SAS.E. for Monthly Sales Fiyer! Will Call Service BAM to SPM 


[as or tictoncn Wotmite Le ey 


ameco Msn 
| ELECTRONICS | | 
1355 SHOREWAY ROAD 
BELMONT, CALIFORNIA 94002 
Phone Orders Welcome (415) 592-8097 
Telex No. 176043 


Dealer inquiries invited. For Technical Information, call (415) 595-3994 


3/84 











“APPLE and APPLE lle are registered trademarks of APPLE Computers, 
“*VisiCalc is a registered trademark of Visi Corp. Inc. 








firivcs JE864 card into your APPLE* and expand your dis- 








‘Send $1.00 
FREE 1984 JAMECO CATALOG tH} play to 80 characters per line, Perfect for word 
Prices Subject to Change processing. The JEB64 also features 64K bytos of 





additional momory to allow programming not pos: 
sible with standard APPLE le* computers, Complete 
+1 documentation included, 








Board: High density board design squeezes 64k 
bytes of RAM onto a 2'2" x 4's" board + Fully tested 
to assure proper operation, 








Uses: Word processing ~ displays 1000 more 
charactors per screen « Extra memory allows run- 
ning of extremely large programs * Ultra High Reso- 


lution Graphics capability 
$149.95 


























“Centronics” Type i 
ft Sve tung ce HT | 
CENSEM SM o $1995 | 
CONDENS J 182895 
COOEMSF LF 2205 t 
CENDEMISE Lt 2895 












































Numeric/Auxiliary 
Keypad for your 
APPLE /le* 








The JE614 Is a newly Introduced 
Aumeric/auxiliary keypad for the 
APPLE ilo. It offers the flexibility of a 
10-key pad and the convenience ot 
23 diroctly accessible functions. 
Screen manipulating functions make 
word processing a snap and cursor 
controls make the keypad ideal for 
VisiCalc" users. The JE614 Keypad 
is housed in a durable motal enclo- 
|] sure and is color-coordinated with 

your APPLE lle computer. Operation 











of the keypad can begin within 
minutes from unpacking. Special 





functions include: Home, Clear, 





Clear to End of Screen, Scroll-Up, 





Scroll-Down, Tab, Delete, Lott, Right, 





Up and Down, Each key has aut 
repeat, Sizo: 570" Lx 4-3/18" Wx 1%" 











to 2%" Slope 
JE614 ....... $89.95 


































































































































































































Little Known 
BASIC Commands 


Todd Heimarck, Assistant Editor 


You probably know how to use BASIC com- 
mands like PRINT and INPUT. But how many 
of your programs contain WAIT, ATN, or 
LOG? These and other.seldom used Commo- 
dore BASIC commands can help you do more 
with the programs you write. 

Go 


When you're speaking or writing, you can choose 
from a smorgasbord of about 175,000 English 
words, not counting proper names. Some have 
been around hundreds of years and are rarely 
used anymore; when was the last time you said 
“yclept” or “‘soothly’’? Others are narrowly de- 
fined technical terms, used primarily within a 
trade or profession. 

As diverse as our language is, there are a few 
words that do most of the work. Linguists estimate 
that if you know just 3,000 English words, you 
are able to understand over 80 percent of what 
you read or hear. 


Expanding Your BASIC 
Vocabulary 

Commodore BASIC is much more limited than 
English or any other natural language. For one 
thing, it contains only about 70 words. And there 
are strict rules of syntax about how you can use 
them. BASIC is not a language for poets. 

But BASIC is similar to English in that there 
are a few workhorse words, common commands 
that are used time and again. 

To get information into the computer, you 
need INPUT, GET, and READ-DATA. To perform 
loops and make decisions, FOR-NEXT and IF- 
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THEN. To put the results on the screen, PRINT. 
Now let’s expand our vocabulary a bit with 
some of the little known commands. 


ABS (ABSolute value) 


ABS determines the absolute value of a number. 
It leaves positive numbers alone and changes 
negative numbers to positive. It may sound rather 
useless, chopping off minus signs, but there are 
some interesting things you can do with it. 

The most obvious application of ABS is in 
financial calculations, When you want to make 
sure that no negative numbers appear in a pro- 
gram, you simply ABS them. Another application 
would be a checkbook register which lists all de- 
posits and checks. Perhaps your program auto- 
matically uses negative numbers for checks, but 
you want to print the list without minuses all over 
the screen. 

ABS can be used to avoid crashes in programs 
using SQR (square root) or LOG (logarithm). 
These mathematical functions and others will 
accept only positive numbers; numbers less than 
zero will cause an error message. 

ABS can also be used in a toggle routine. Let’s 
say you want a variable to switch back and forth 
between two different values. You could use the 
following subroutine: : 

1 T=3 

499 REM TOGGLE SUBROUTINE 
508 IF T=3 THEN T=16: RETURN 
510 IF T=16 THEN T=3: RETURN 

Each time you want to toggle, you GOSUB 
500. As you can see, T switches back and forth 
between 3 and 16. But the following routine will 


Five Easy Ways 
To Clean Up Your Finances. 





MmaiaanATT 





actual screen display “Indicates function being shown 


Chart of Accounts 
*Checkbook Maintenance 


*Detall Budget Analysis 
Summary Budget 


Check Search Analysis 
Prints Checks IncomelExponse Mailing List 
Statomonts 


Net Worth Statement 


complete Personal Accountant’ & 


Whether you’re cleaning up at home or around the of- 
fice, there’s NOW a COMPLETE line of money manage- 
ment software that will attend to all the details, while 
letting you see the whole financial picture. The Com- 
plete Personal Accountant’s exclusive combination of 
easy to use programs give the wise investor a quick and 
dependable way to control finances and plan for the 
future. 





FINANCE 1 gets you organized with a standard chart of 
accounts adaptable to any situation, The Checkbook 
Maintenance program with full screen editing and special 
‘Help’ commands lot you find any check by any fleld. 
You can flag tax deductibles, reconcile your bank 
statement, print checks and more. 


FINANCE 2 tells you where your money is, 
where it's going and where it’s coming 
from. The Detail and Summary Budgot pro: 
grams show exactly where you're spending 
your money. Tho Incomo/Exponse and Not 
Worth programs provide professtonal- 
looking statements that can be printed 
with any 80 column printer. 

FINANCE 3 separates the CPA from the 


competition. No other finance package for 
the home or small business gives you Ap- 




















Appointments Calendar 
Payments Calendar 
*Color Chart Package 


*Income Tax 
Prints forms 
Most schedules 
Uses Finance 1,2 and 4 


v 


“Spreadsheet 
Compatible with 
Finance 1, 2 and & 


‘ 
, 


pointments and Payments Calendars for scheduling your time and money. 
Few packages offer the ability to chart’each account In color, And only the 
CPA Includes a mailing list with a 1200 namo capacity*. All reports are print. 
able with an 80 column printer. 


FINANCE 4 lots you determine the “what It's" of your financial future. With 
thls easy to learn spreadsheet you'll spend more time making decisions and 
loss time crunching numbers, 


FINANCE 5, The Tax Handler, uses your files from Finance 1, 2 and 4 tocom- 
plete your taxes in a fraction of the normal time. 


Tho Complete Personal Accountant” line of money manage- 
ment software Is simply the most comprehensive, easy to 
uso financial software available anywhere, 
































Disk 
Finance 1 30,95 
2 29.95 24.95 
Finance 3 29.95 24.95 
Fi 4 29.95 24.95 
59.95 54.95 
jon you 
Finance 1, 2 
79.95 74.95 






tor Atarl 400/800/1200", Commodore 64”, 
7 TRS 60 Color™ and Vic 20" 


1 to change without notice, Add $3.00 
\d handling. 


lor to 
334-SOFT to order 


*Varles according to computer. 









‘a running demo or call 
t. 


a division of 





p.o. box 3470, department cg, chapel hill, north carolina 27514 Pm 


Commopore 64 Bettie ae VIC-20 


(more power than Apple II at half tne price) SALE (a real computer at the price of a toy) 


$99.5°* ace = 869,50 








HAVE i HAVE 
* THE @@ THE 
* 170K DISK DRIVE $159.00 BEST I LOWEST * 40-80 COLUMN BOARD $59.00 
© TRACTION FRICTION PRINTER $109.00 * SERVICE fm PRICES * 32K RAM EXPANDER $95.00 


















>% COMMODORE 64 COMPUTER $99.50 SPECIAL SOFTWARE COUPON VIC-20 COMPUTER $69.50 





You pay only $199.50 when you order the power- This 25K VIC-20 computer includes a full size 66 
ful 84K COMMODORE 64 COMPUTER! LESS the key typewriter keyboard col 

value of the SPECIAL SOFTWARE COUPON we \Welpeckia| SPECIAL SORTWARE|COUFON uppediower case, tll screen euligy AK Teves I 
pack with your computer that allows you to with every COMMODORE 64 COMPUTER: microsoft basic, sound and music, real time 
SAVE OVER $100 off software sale prices!! With DISK DRIVE-PRINTER-MONITOR we sell! floating point decimal, self teaching book, con- 


only $100 of savings applied, your net computer This coupon allows you to SAVE OVER nects to any T.V. or monitor! 
conte $100 OFF SALE PRICES! $200-$300 sa 

SOFTWARE BONUS PACK $29.95 ings are possibie!! stamps 40-80 COLUMN BOARD $59.00 
When you buy the Commodore 64 Computer Now you can get 40 OR 80 COLUMNS on your 
from Protecto Enterprizes you quality to pur- T.V. of monitor at one time! No more running 
chase ONE SOFTWARE BONUS PACK for a out of line space for programming and making 
special price of $29.95!! Normal price is $49.95 columns! Just plug in this Expansion Board and 

























PROFESSIONAL SOFTWARE 

























(40 programs on disk or 24 programs on5 tapes). COMMODORE 64 you immediately convert your VIC-20 computer 
Fave lak DruvE éi8e.c6 Nae word Uist Sale to 40 OR 80 COLUMNS!! List $129. SALE $59.00. 

159. ecutive Wor You can also get an 80 COLUMN BOARD WORD 

You pay only $259.00 when you order the 170K Ranuihe bale Bose laniemene Man eoto PROCESSOR with mail merge, terminal emulat- 
Disk Drivel LESS the value of the SPECIAL 20,000 Word Dictionary $2495 $1995 of, ELECTRONIC SPREAD SHEET! List $59.00. 


SOFTWARE COUPON we pack with your disk Electronic Spreadsneat $89.00 $59.00 


SALE $24.95 if purchased with 80 COLUMN 
drive that allows you to SAVE OVER $100 off (Accounting Pack $08 COA 90,00. 


BOARD! (Tape or Disk). 











ttware sale prices! With only $100 of savings Mire era 
applied, your not disk drive cost is $189.00 Tape $8900 $5600 














ee Fer aed 32K RAM EXPANDER $95,00 































4% TRACTION FRICTION PRINTER $109.00 Total Text26 This cartridge increases programming power 
You pay only $209.00 when you order the Com- Word Processor over 8 times!! Expands total memory to 57K 
star TIF deluxe line printer that prints 8 1/2 x 11 toe Sesnotiliarenail seen (57,000 bytes). Block switches are on outside of 
{ull size, single sheet, roll or fan told paper, Total Labei28 Cover! Has expansion port! Lists for $199 (OUR 
labels otc. 40, 66, 80, 132 columns. Impact dot Tape $2495 $1800 $1200 BEST BUY!) 

matrix, bidirectional, 80 CPS, LESS the value of a $2995 $2300 $1500 



















the SPECIAL SOFTWARE COUPON we pack ro $39.00 

with your printer that allows you to SAVE OVER BasieTuortTapeDisn) 32985 Sze S800 

$100 off software sale prices!! With only $100 of Typing ae cher sms sass $15 

(rapelDisk) 7 15.00 

Raa applied your net printer cost is only Oe $1695 $1495 $10.00 
00, $1995 $1795 $1200 

80 COLUMN BOARD $99.00 ty VJorsuck $2098 $1898 Stoo 

‘ rotessional Joy Se 

Now you program 80 COLUMNS on the screen porto Bae Hepp) 

at ona time! Converts your Commodore 64 to 80 ‘ 

SOLUMNS when you plug in the 80 COLUMN (See tii oreatiior 
EXPANSION BOARDI! List $199SALE $99 Welle cccalt for 
PLUS—you also can get an 80 COLUMN BOARD ‘Sample SPECIAL SOFTWARE COUPON! 
WORD PROCESSOR with mail merge, terminal 
emulator, ELECTRONIC SPREAD SHEET. List 
$59.00 SALE $24.95 if purchased with 80 
COLUMN BOARD! (Tape or Disk) 


80 COLUMNS IN COLOR EXECUTIVEQUARIZY, 

EXECUTIVE WORD PROCESSOR $69.00 PROFESSIONAL BUSINESS SOFTWARE 
This EXECUTIVE WORD PROCESSOR is the 
finest available for the COMMODORE 64 com- 
puter! The ULTIMATE for PROFESSIONAL Word: The Cadiiea of business programs 
processing application! DISPLAYS 40 OR 80 for Commodore 64 Computers 
COLUMNS IN COLOR or Black and White! Sim: Hem Ust "SALE 
ple to operate, powerful text editing with a 250 reve mony erepemend $9000, $50.00 
WORD DICTIONARY, complete cursor and in: Assousite romp Hery 
sertdelete key controls line and paragraph inser- Payrolt 39900 $59.00 
tlon, automatic deletion, centering, margin set- ‘General Ledger $99.00 $59.00 
tings and output to all printers! Includes a (“COUPON PRICE $49.00) 12” AMBER SCREEN MONITOR $119.00 
powerful mail merge. List $99.00 SALE $69.00. Premium quality AMBER VIDEO MONITOR With 
20,000 WORD DICTIONARY - List $24.95 SALE antiglare, (80 characters x 24 rows), exceptional 
$19.95, EXECUTIVE DATA BASE - List $89.00 ly clear screen, faster scanning. PLUS $9.95 for 
SALE $59.00. (Disk only). VIC 20 or Commodore 64 Cable. 


60K MEMORY EXPANDER $49.00 
Sixsiot — Switch selectable — Reset button — 
Ribbon cable — CARDCO. A must to get the 
‘most out of your VIC-20 Computer! 















































8K RAM CARTRIDGE $39.00 
Increases programming power 2 1/2 times. Ex: 
pands total memory to 33K (33,000. bytes). 
Memory block switches are on outside of cover! 
Includes FREE $16.95 game. 































16K RAM CARTRIDGE $55.00 
Increases programming power 4 times. Expands 
total memory to 41K (41,000 bytes), Memory 
block switches are an outside cover! CARDCO 
Includes FREE $29.95 adventure game! 
















12” GREEN SCREEN MONITOR $99.00 
Excellent quality GREEN PHOSPHOROUS 
VIDEO MONITOR with antiglare, 1920 charactors 
(80 characters x 24 rows). Save your TV! a must 
for 80 column word processors. PLUS $9.95 for 
VIC 20 or Commodore 64 Cable. 





































« LOWEST PRICES « 15 DAY FREE TRIAL * 90 DAY FREE REPLACEMENT WARRANTY 
* BEST SERVICE IN U.S.A. * ONE DAY EXPRESS MAIL * OVER 500 PROGRAMS * FREE CATALOGS 


| Please add 6% tax. Add $20.00 for CANADA, PUERTO RICO, HAWAII 
1 orders. WE DO NOT EXPORT TO OTHER COUNTRIES. 
ENTERPRIZES wovcourcusronens 


Enclose Cashiers Check, Money Order or Personal Check. Allow 14 days 
BOX 550, BARRINGTON, ILLINOIS 60010 


for delivery, 2 to 7 days for phone orders, 1 day exorese mail! Canada 
orders must be In U.S. dollars. VISA— MASTERCARD > 
4 Phone 312/382-5244 to order 





FANTASTIC 
PRINTER 
SALE 


= $ 00 
low 
as 


e 15 Day Free Trial - 180 Day Immediate Replacement Warranty 











LIST SALE 
80 COLUMN THERMAL PRINTER — 60 CPS $199 $149 


Bi-directional, dot matrix, prints 8%” letter size paper, full 80 columns, high 
resolution graphics, dot bit addressable, special symbols and true decenders! 
(Centronics parallel interface) 


80 COLUMN TRACTOR-FRICTION PRINTER — 80 CPS $399 $209 
Bi-directional, dot matrix, impact, prints single sheets, continuous feed paper, 

adjustable columns, 40 to 132 characters! Roll paper adapter $32.95. 

Centronics parallel interface) 


PREMIUM QUALITY 10” CARRIAGE T/F PRINTER — 120 CPS $499 $289 
Bi-directional, impact, 9 x 9 dot matrix with double strike for 18 x 18 dot matrix. 

High resolution bit image (120 x 144 dot matrix) underlining back spacing, left and 

right margin settings, true lower decenders, with super and sub scripts. Prints 

standard, italic, block graphics, special characters, plus 24 of user definable 

characters and much more!! Prints single sheets, continuous feed and roll paper! 

(Centronics parallel interface) 

PREMIUM QUALITY 15%” CARRIAGE PRINTER — 120 CPS $599 $379 
Has all the features of the Premium Quality 10” Carriage T/F Printer above plus a 

15'4" carriage and more powerful electronic components to handle large business 

forms! (Centronics parallel interface) 


HIGH SPEED PREMIUM QUALITY T/F 

10” PRINTER — 160 CPS $699 $499 
Save printing time with these plus features: 160 CPS speed, 100% duty cycle, 8K 

buffer diverse character fonts special symbols and true decenders, vertical and 

horizontal tabs, This is Red Hot Efficiency!!! (Serial or Centronics parallel interface) 

HIGH SPEED PREMIUM QUALITY 

TIF 15%” PRINTER — 160 CPS $799 $599 
Has all the features of the 10” Carriage high speed printer plus a 15'4” carriage and 

more powerful electronics to handle larger business forms! (Serial or Centronics 

parallel interface) 


PARALLEL PRINTER INTERFACES: (IN STOCK) 
* For VIC-20 and COMMODORE 64 $49.00 
* For all APPLE COMPUTERS $69.00 
* For ATARI 400 and 800 COMPUTERS $79.00 

NOTE: Other printer interfaces are available at computer stores! 


WE DO NOT EXPORT TO OTHER COUNTRIES EXCEPT 
CANADA. 


Enclose Cashiers Check, Money Order or Personal Check. Allow 


14 days for delivery, 2 to 7 days for phone orders, 1 day express (WE LOVE OUR CUSTOMERS! 
ee eee Mats (ose olare| Wereoant Wie ENTERPRIZES i 
and MasterCard, We ship C.0.D. BOX 550, BARRINGTON, ILLINOIS 60010 


Phone 312/382-5244 to order 


@ SANYO MONITOR SALE!! 


80 Columns x 24 lines 
Green text display 

East to read - no eye strain 
Up front brightness control 
High resolution graphics 
Quick start - no preheating 
Regulated power supply 
Attractive metal cabinet 
UL and FCC approved 





9” Data Monitor 


e 75 Day Free Trial - 90 Day Immediate Replacement Warranty 





9” Screen - Green Text Display $ 79.00 
12” Screen - Green Text Display (anti-reflective screen) $ 99.00 
12” Screen - Amber Text Display (anti-reflective screen) $119.00 




















14” Screen - Color Monitor (national brand) $249.00 
Display Monitors From Sanyo 
With the need for computing power growing every day, Sanyo has 
stepped in to meet the demand with a whole new line of low cost, high BR SANYO 
quality data monitors. Designed for commercial and personal com- Official Video Products 
puter use. All models come with an array of features, including up- of the Los Angeles 1984 Olympics 
front brightness and contrast controls. The capacity 5 x 7 dot 
characters as the input is 24 lines of characters with up to = 
80 characters per line. === = _ 
Equally important, all are built with Sanyo’s commitment ===" = 
to technological excellence. In the world of Audio/Video, Sanyo is aS= SS 
synonymous with reliability and performance. And Sanyo quality is Caras Tsiaa pen Oa 
reflected in our reputation. Unlike some suppliers, Sanyo designs, 
manufactures and tests virtually all the parts that go Into our products, QLD 
from cameras to stereos. That's an assurance not everybody can 
give you! 


5 DAY FREE TRIAL ¢ 90 DAY FREE REPLACEMENT WARRANTY 


BEST SERVICE IN ONE DAY EXPRESS MAIL * OVER 500 PROGRAMS ¢ FREE CATALOGS 


Wada $10.00 for shipping, handling and insurance. Illinois 
I please add 6% tax. Add $20.00 for CANADA, PUERTO RICO, HAWAII J 


1 orders. WE DO NOT. EXPORT TO OTHER COUNTRIES. 

I Enclose Cashiers Check, Money Order or Personal Check. Allow 14 ENTERPRIZES w#:ovecurcusronens 
| days for delivery, 2 to 7 days for phone orders, 1 day express mail! BOX 550, BARRINGTON, ILLINOIS 60010 

1 Canada orders must be in U.S. dollars. Visa - MasterCard - C.0.D. Phone 312/382-5244 to order 












VIC 20 
40-80 COLUMN BOARD 


only $5900 


Now you can get 40 or 80 Columns on your T.V. or monitor at one time! No} 
more running out of line space for programming and making columns. Just 
plug in this board and you immediately convert yur VIC-20 computer to 40 or| 
80 columns! Comes in an attractive molded case with instructions! List 
$129.00. Sale $59.00. 


FOR ONLY $24.95 you can get a 40-80 Column Board “WORD PROCESSOR” with mail merge 
and terminal emulator PLUS! AN ELECTRONIC SPREAD SHEET (like Visicalc) the word 
Processor requires 8K—mail merge 16K! List $59.00. Sale $39.90. “If purchased with board 
only $24.95. (Tape or Disk.) 


WE LOVE OUR CUSTOMERS! 


COMMODORE 64 ere 
80 COLUMN BOARD : 


$9900 


Now you can program 80 columns on the screen 
at one time! Converts your Commodore 64 to 80 
coilumns when you plug in the PROTECTO 80 
Expansion Board List $199. Sale $99.00 


FOR ONLY $24.95 you can get an 80 Column Board ‘WORD PROCESSOR” with mail merge and 
terminal emulator PLUS! AN ELECTRONIC SPREAD SHEET (like Visicalc) List $59.00. Sale $39.90. 
*If purchased with board only $24.95. (Tape or Disk.) 


‘Add $3,00:10r postage. Add $6.00 for CANADA, PUERTO RICO, HAWAII P & oO TE CTO 

orders, WE DO NOT EXPORT TO OTHER COUNTRIES. 

Enclose Cashiers Check, Money Order or Personal Check. Allow 14 

Foe oe en ie ea eee en | ENTERPRIZES wcvvcouncesrouens: 

Canada orders must be in U.S, dollars. We accep! Visa and Master. BOX 550, BARRINGTON, ILLINOIS 10 
Phone 312/382-5244 to order 





do the same thing with just one line: 
1 Ts3 
499 REM ABS TOGGLE SUBROUTINE 
586 T=ABS(T-19): RETURN 

Line 500 does it all. If T is 3, 3 minus 19 is 
-16, and the ABS chops off the minus sign. But if 
Tis 16, subtracting 19 yields —3, and the minus 
sign is chopped off. 


POS (POSition of cursor) 


To understand how the POS(X) command works, 
you should recall that you are limited to 88 char- 
acters per program line on the VIC-20 (80 charac- 
ters on the 64). However, a full program line won't 
fit on one line of the screen. A line on the VIC’s 
screen is only 22 characters wide, and a screen 
line on the 64 takes only 40 characters. So, a full 
program line can fill up to four screen lines on the 
VIC and two screen lines on the 64. 

A program line stored in memory is called a 
logical screen line. This logical line is displayed on 
your TV or monitor in one or more physical screen 
lines. The POS(X) command tells you the position 
of the cursor within the logical screen line. On the 
VIC, the position number ranges from 0 to 87, 
and on a 64, it ranges from 0 to 79. 

Whenever you press RETURN, the cursor 
position pointer is set to position 0 (the first posi- 
tion), and the cursor moves to the beginning of a 
new physical screen line. Every time you type a 
character, the position pointer increases by one 
and the cursor moves one position to the right on 
the screen. On the VIC, when you type in the 
twenty-third character, the cursor moves to the 
beginning of the next physical screen line, but the 
pointer increments to position 22, in the logical 
screen line. (This occurs with the forty-first char- 
acter on the 64; the pointer would contain a 40.) 
The pointer continues to increase until you type 
the maximum allowable number of characters, or 
you type a RETURN, 

The POS function is little used, for good 
reason. When was the last time you asked your- 
self, “I wonder where the cursor is?” 

But there is a way you can use POS. When 
the 64 PRINTs a line longer than 40 characters (22 
characters on the VIC), it wraps around to the 
next line. Words are often split haphazardly, 
making text hard to read. 

To avoid splitting words, you can use POS(X) 
to check the cursor position and LEN(N$) to check 
the length of the next word to be printed. If posi- 
tion + length exceeds the character limit of the 
physical screen line, PRINT CHR§(13) to reset the 
position pointer to 0, then continue printing your 
text. 

The variable X in the parentheses of POS(X) 
is a dummy argument; it doesn’t matter what 
value you use. 
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WAIT 

Like POS, WAIT is seldom needed in BASIC pro- 
grams. To understand how it works, think of it as 
WAIT-UNTIL. For example, you WAIT to cross 
the street UNTIL the light is green. WAIT stops 
program execution UNTIL a memory location 
contains a certain number. When the location 
contains the proper value, program execution 
continues. 

WAIT statements use the form WAIT I, m1, 
m2. Lis the memory location to be checked. M1 is 
mask one; m2 is mask two (which is optional). 
The computer PEEKs memory location !, exclusive- 
ORs the value with m2 and ANDs it with m1.(For 
further information on masks and the logical op- 
erations AND and exclusive-OR, see “The Inner 
World Of Computers, Part 2: Why Computers 
Are Logical” in the December 1983 GAZETTE, or 
Machine Language for Beginners, COMPUTE! 
Books.) 

WAIT is rarely used because memory loca- 
tions don’t change arbitrarily. Since memory is 
used for storage, you expect memory to hold onto 
its contents. If a number in RAM changes, there 
has to be a good reason. 

Certain peripherals use memory locations as 
buffers and registers. Thus, WAIT is usually used 
in input/output operations. You might want your 
program to pause until a signal comes over the 
phone line to your modem, for example. You 
would use WAIT to check a buffer or input register 
when the signal comes in, the register changes, 
and the program continues. 

Datassette users can protect graphics displays 
with a WAIT statement. 

Let’s say you write a program which uses 
data stored on a tape, but it does not read the 
data until halfway through the program. You 
know that when the program sees OPEN it will 
print PRESS PLAY ON TAPE in the middle of the 
screen. You may have a nice graphic display (or a 
high-resolution screen) that you don’t want ruined 
by the prompt. 

A WAIT can test to see if a button has been 
pressed on the tape player: 

WAIT 1,16,16 (64 version) 

WAIT 37151,64,64 (VIC version) 

If you put this line in just before you OPEN 
the data file, the program will wait until a button 
is pressed on the tape drive. It will not print PRESS 
PLAY ON TAPE. When the play button is pressed, 
a bit is switched in memory. Your computer stops 
waiting and opens the file for input. But, alas, 
solving one problem may create another. If the 
user does not know what is happening, he or she 
may end up waiting for the computer to do some- 
thing, as it waits for the user to do something. To 
help other people use your programs, you should 


"Available at your favorite 
computer store or send check or 
money order to: MMG Micro Software 
P.O. Box 137 
__ Marlboro, Ni 07746 


Please add $3.00 for postage and handling. OF call: : 
_ Use your Visa, MasterCard or orcer COD. = (201) 431-3472 
NJ. residents please add 6% sales tax. 





put a prompt on the screen just before the WAIT 
statement is executed, telling the user what to do. 

You can do it the other way, too. If you want 
the computer to wait for the user to press the stop 
button on the tape player, use: 

WAIT 1,16 (64 version) 

WAIT 37151,64 (VIC version) 

There are times when a joystick does not 
work with the VIC because the play button on the 
cassette drive is still on. Using the above WAIT 
statement can test for this problem. 


CONT (CONTinue) 
CONT is a valuable debugging tool. It allows you 
to restart a program which has stopped because 
you pressed the RUN/STOP key, or because the 
program hit a STOP or END. 

Let's write a simple program with a bug: 


10 M=2 rem 29 
20 INPUT "NUMBER"; N trem 136 
38 PRINT N; "TIMES TWO IS"; N*M srem 213 
48 FOR M = 1 TO 26; NEXT M: REM DELAY LOO 

P zsrem 152 
58 GOTO 26 srem ® 


Now RUN the program. The screen says 
NUMBER? Type in 15, press RETURN, and it 
gives the result of 30. So far, so good. Now try 
zero. Zero times two is zero. It seems to be 
working. Type 4 and the computer says four times 
two is eighty-four. Something is wrong. 

It's debugging time. Insert this line: 35 
STOP. 

RUN it again and the computer multiplies 
correctly. Then it stops and says BREAK IN LINE 
35. Type CONT and it continues. Try another 
number (except zero). The answer is incorrect; 
the program stops again. Type PRINT N, Mand 
you will discover that M is now equal to 21. If you 
want to try another number, type CONT. Each 
time you will discover that M equals 21. That’s a 
clue that something is not working right. 

If you’re wondering what the bug is, you 
may notice that M starts out as 2 (line 10), but that 
it is also used in the delay loop. To correct it, you 
have to use a different variable in line 40. 

Some bugs do not occur right away. The first 
time through, everything works. Then the bug 
pops up. The best way to step through a program 
is to use the STOP-PRINT-CONT combination. 

There are a few BASIC commands that can 
be used only in a program; they don’t work in 
immediate mode. CONT is unique: It is the only 
command used exclusively in immediate mode. 


SGN (SIGN) 
SGN is used to evaluate numbers. If the number 
is positive, the result is 1. If the number is negative, 
SGN gives you a-1. If the number is zero, you 
get a zero. 

This function complements the ABS com- 
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mand discussed above. ABS throws away the 
sign so you can look at the number. SGN throws 
away the number but keeps the sign. 

Some programmers use SGN to make deci- 
sions about branching. 


16 FOR J = 1 TO 5: READ K: PRINT K; 

rrem 198 
28 ON (SGN(K)+2) GOTO 36, 48, 50 :rem 238 
3®@ PRINT "IS NEGATIVE.": GOTO 66 :rem 42 
40 PRINT "IS ZERO.": GOTO 60 trem 24 
5@ PRINT "IS POSITIVE." trem 115 
66 NEXT J srem 239 
508 DATA 15, 306, -4, 6, -654.32 :rem 72 


In the program above, line 20 checks the sign 
of the number. SGN(K) yields -1, 0, or 1. Add 
two to get 1, 2, or 3. The ON-GOTO then makes 
the program branch to line 30, 40, or 50. It’s a 
quick way to check for positive or negative num- 
bers and branch accordingly. 

SGN is also good for comparisons. To com- 
pare two numbers (the scores of player one and 
player two, for example), subtract one from the 
other, and use SGN to evaluate which one is 
higher, perhaps with the ON-GOTO syntax of 
line 20 above. 


ATN (ArcTaNgent) 


Few people have neutral feelings about 
trigonometry; you either love it or hate it. 

If you can’t remember anything you learned 
in trig, don’t worry, this won't be too technical. 
First, look at the triangle below. 


spaceship 


y value 


Ke 
X value 


Imagine that you are looking at a spaceship 
flying toward you out of the sky. Your computer 
can figure out the values for x and y, but you have 
to aim the laser, which is your only defense. And 
you don’t have a joystick; you have to figure out 
the angle at which to shoot. 

You're in luck because your computer knows 
how to use ATN. ATN(Y/X) gives you the angle 
in radians. Divide by z (pi) and multiply by 180 to 
get the answer in degrees. (To type the symbol, 
hold down SHIFT and press the up-arrow key.) 
This simple program calculates an angle from X 
and Y coordinates. 


19 PRINT "X AND Y COORDINATES"  :rem 241 
20 INPUTX,Y :rem 207 
30 IF X=@ THEN S=SGN(Y):D=906*S:R=S*t/2:GO 

TOSS rem 39 
40 R=ATN(Y/N): D=R*180/tT rrem 251 


PRINT "ANGLE IS";R;"RADIANS": PRINT D; 
"DEGREES": GOTO 10 trem 164 
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Verbatim $S/OD (10) ‘Call 
WORD PROCESSING 
Quick Brown Fox "42 
Easy Script “34 
Word Pro 64 +64 
EZ Spell 7 
PROGRAMMING SERIES 
Assembler 64 15 
Logo +38 
Pilot "38 
Simon Basic "9 
Screen Editor 19 
CPM 22 ‘56 
EDUCATION 
English |-vit ‘9 
Math [-VIIL ‘9 
Computer Science. 9 
Science LV 9 
Technology 9 
History 9 
Business 9 
Geog 9 
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Avenger "5 
Wizard Wor "9 
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Pinball Spect 16 
Lemans 14 
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Clowns. 19 
Gort 19 
1 19 
Sea Wolf "9 
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Zork 1. 1H 125 ea. 
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Starcross. 125 
125 
Features 
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with vinyl 
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with a difference! 
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compatibility, especially for professionals and 
serious computer users. Look us over; SuperTerm 
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When you run the above program, you will notice 


string variable, LEN to find out the length, and 


that the angle will always range from +7/2 to—7/2 finally a calculated TAB to print the number in its 


(+90 to-90 in degrees). If you want the full range 
of 9 to 360 degrees, you have to figure out which 
quadrant you're in and adjust the results. You 
would most likely use SGN to find out if x and y 
are positive or negative. 

ATN may seem to be an esoteric, obscure 
function of interest only to mathematicians, but 
there are times you may need it. 

If you want to doa three-dimensional display, 
for example, you will probably need ATN to figure 
the angles. It may also be useful in a Star Trek 
simulation when you need to figure out where 
the ship is and which shields the Klingons are 
battering. 

Anytime you are working with angles, re- 
member ATN. 


LOG (natural LOGarithm) 


This is another function which may intimidate 
those who aren’t mathematicians. The idea behind 
it is actually fairly simple and can be helpful in 
some programs. 

If you type PRINT1014, the result is 10000, 
because it’s ten to the fourth power. Reversing 
this function, the logarithm (base ten) of 10000 is 
4. Simply put, the logarithm of a number is the 
exponent you use on the base. 

AM radio dials use a logarithmic scale, which 
is why the distance between 600 and 800 appears 
to be bigger than the distance between 1400 and 
1600. You can also find a logarithmic scale on a 
slide rule. 

The LOG built into your computer does not 
use base ten. It is a natural logarithm, which has 
certain special properties. Try the following short 
program: 


16 INPUT"NUMBER";N zrem 135 
20 PRINT: PRINTLOG(N)/LOG(2), zrem 247 
38 PRINT LOG(N)/LOG(10) trem 52 
4@ GOTO 16 trem 254 


This program figures out the log (base two) 
and the log (base ten) of a number. Try inputting 
the numbers 10, 100, 1000, and so on. The right- 
hand column should contain whole numbers. 
Now try 2, 4, 8, 16, and 32. You should see integers 
on the left. 

So far it’s just math. Now let’s use LOG to 
solve a common problem. Computers are good at 
moving numbers around. And it is sometimes 
necessary to print a column of numbers with all 
the decimal points lined up, nice and neat. 

Unfortunately, Commodore BASIC has 
neither a PRINT USING nor a PRINT AT com- 
mand. Beginning programmers sometimes align 
numbers with a complicated string-conversion 
procedure. For example, they might use INT to 
make the number an integer, STR$ to make ita 
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place. 
Using LOG can make things simpler. The 
following program aligns numbers of all sizes. 


18 T=LOG(16): D=14 trem 166 
26 INPUT N trem 64 
30 S=INT(LOG(N)/T) rrem 51 
40 PRINT TAB(D-S);N rrem 162 
58 GOTO 26 trem 6 


Line 30 figures the base ten logarithm of the 
number from line 20. In effect, you find the length 
of the number by using its (base ten) logarithm. 
Numbers 1 through 9 have a log of zero, 10 
through 99 have a log of one, and so on. 

But, unfortunately, we have once again 
solved one problem and created another. We can- 
not find the logarithm of a negative number or 
zero. This can be remedied with two of the BASIC 
commands described earlier. Add the following 
line to trap zero: 

25 IF(ABS(SGN(N))-1) THEN S=@: GOTO 49 
srem 25 

It would actually be simpler to say IF N=0 
THEN S=0, but let’s go with ABS and SGN. To 
deal with negative numbers, change line 30 from 
LOG(N) to LOG(ABS(N)). 

And now we have it, a routine for aligning 
decimal points, without having to resort to integer/ 
string conversion. 


Using Little Known Commands 
The most useful BASIC keywords are still the 
most common ones, such as PRINT and FOR- 
NEXT. But if you take the time to learn these sel- 
dom used commands, you may be rewarded 
someday when you are struggling to solve an 
unusual programming problem. @ 
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PORTA-COMPUTE Pr I r) 

disk drive & your monitor 

or TV (up to 9") in a sturdy 

metal case making your 

A carrying handle & master 

switch make it even easier 

to use. Use a printer or 


Makes a neat package 
system portable. Just plug 
external monitor, too. 


Some assembly required 
To order your PORTA-COMPUTE send check or money 
order for $129.95 (includes shipping) to: JC. Enterprises 








|__ 427 Scandia Ave. Des Moines, lowa 50315 








Weareitt..) “ Tarmy 
80 Column Smart Terminal 
For Your C64 Without Any Hardware Change! 
VIP TERMINAL™ 
youd gor have the VIP Terminal 


® Built-in 40, 64, 80 and 106 columns 
® Word wrap for a formatted display 


Terranal ready 
bear Perger, 


You're right. has 
ong. hat fi 
especially with 


the $8.9 = nuh 


need ay hadare 


al to werk rsh 
by 0.1 had UP ken 
Sraigt! 


alk 


6 I 
= yy bred, Lube the 
fighl 


Mheracthe propas, incluiira 3 
shach will be od son. Si Foon 
n pie 
AB 


| 
alia 


The Library Concept 


The VIP Terminal is only the first in a 
whole series of elegant software for 
your Commodore 64 called the VIP 
Library. This complete collection of 
easy-to-use, serious, high quality, 
totally interactive productivity software 
includes VIP Writer, VIP Speller, VIP 
Calc, VIP Database, VIP Disk-ZAP, 
Accountant and VIP Tax. All are eq 
in quality to much more expensive 
software for the IBM PC, and all are 
very affordable! 















al Memory 
3 VIP Library programs:are not limited 
# by the size of your computer's 

memory. All programs use virtual 
memory techniques to allow creation 
and use of files larger than your 
computer’s available work area. You're 
only limited by the space on your disk! 
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Icons Make Learning Easy 


Hi-res technology and sprites allow 
VIP Library programs to bring you task 
Icons, made famous by the Apple Lisa™ 
and the Xerox Star™. With these 
advanced sprite representations of the 
task options open to the user, even the 
total novice can, at a glance, perform 
every task with ease. Just look at the 
icon and press a key! No programs are 
easier or more fun to learn and use! 
Total Compatibility 

All VIP Library programs are 
compatible with each other and other 
computers for easy file transfer. Each 
uses ASCII, the universal language of 
computer communications so that files 
can be sent to and received from other 
computers without modification! The 
Library also gives you the benefit of a 
consistent icon and command 
structure. Once you have learned one 
program, the others will come easily. 


ee== For Orders ONLY 
— Call Toll Free — 
A Tit) ae bp 1) ed rd be 
1-800-328-2737 
Order Status and Software Support 
call (612) 881-2777 
Available at Dealers everywhere. If your 
Dealer is out of stock ORDER DIRECT! 
MAIL ORDERS: $3.00 U.S. Shipping ($5.00 
CANADA; $10.00 OVERSEAS. Personal 
checks allow 3 weeks. 





@ Talk to any computer 

@ Use any modem and printer 

& Written in fast machine code 

= 15 entry phone directory 

= 20 programmable keys 

= Automatically dial, redial, upload, 
download and log-on 

® Professional 96 character ASCII display 

@ 128 character ASCII keyboard 

® Simultaneous on line printing and 
saving of files to tape and disk 

® Use and save files as big as your disk! 

@ E Mail & E-COM Compatible 


Get yours NOW! $49.95 


Vion = 
VIP Library 


Professional Displays 

The 40-characters-per-line display of 
the Commodore 64 is inadequate for 
serious computing. An 80-column 
display is the industry standard. VIP 
Library programs bring this standard to 
your Commodore 64 with state-of-the- 


‘art graphics, without need for costly 


hardware modifications. With VIP 

Library programs you can freely choose 
from four displays: the standard 40 
column display, plus a 64, 80 and even 
a 106 column tS 25 line display. With 
these programs you can have more text 
on your screen than on an IBM PC or 
an Apple Ile with an 80-column board! 
Welcome to the professional world! 


Who Is Softlaw? 

Softlaw Corporation has years of soft- 
ware experience in micros. We currently 
offer the full-line VIP Library for other 
micros in the U.S. and in Europe. Now we 
are bringing this experience to the Com- 
modore 64 so you get ultra-high quality 
software at very affordable prices. 
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Tank Mania: 


Adding A Second Joystick 
To The VIC 


Ken Gibbons and Curtis Rich 


Not only do the authors show how to connect a 


second joystick to your VIC-20, they also pro- 


vide a two-player game to put the extra joystick 


to work. The project is simple and does not 
require you to open your VIC or modify it. 
ia 


All of us have had many enjoyable hours playing 
games against the VIC. But there’s nothing like 
the thrill of beating a human opponent who is 
canny and unpredictable. Here is where a problem 
arises—all of the destructive energy you unleash 
at computer bad buys usually ends up being, 
absorbed by the keyboard. In an exciting action 
game it can take a real beating, especially in a 
two-player game. 

Also, perhaps you have noticed how easy it 
is to press the wrong key, or that the computer 
recognizes only the first key pressed and ignores 
all others until the first key is released (an espe- 
cially effective tactic when you are trying to pre- 
vent your opponent from moving). For this reason 
most home computers provide us with game ports. 


Only One Game Port 

You can use joysticks, paddles, and light pens. 
with these game ports. The joysticks and paddles 
are perhaps the most popular, because they are 
inexpensive, easy to use, and can take the punish- 
ment of arcade-type action games. 

The VIC is no exception. It comes equipped 
to handle paddles or a joystick. But this is where 
we find a shortcoming in the otherwise well- 
equipped VIC. Most home computers have at 
least two game ports, but the VIC has only one. 


A Joystick In The User Port 


The VIC will handle two joysticks, though. For 
about five dollars in parts you can add the second 
game port, allowing you to operate two joysticks, 
the paddles with a joystick, or whatever. 

The VIC joystick is connected through a Ver- 
satile Interface Adapter (VIA) port. The VIC has 
four of these VIA ports for input and output pur- 
poses. Three of the VIA ports are used to read the 
keyboard, read the original game port, and for 
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The red tank attacks, while the blue player maneuvers to get 
out of the corner in “Tank Mania.” 


various cassette and disk operations. The fourth 
port (called the user port) is left free. Unless you 
are using a modem or some other RS-232 device, 
the User Port on your VIC is idle and is available 
for a second joystick. 


Simple Construction 

The construction is simple and requires no mod- 
ification to the VIC, Get an edge connector (7/25 
with .156 spacing), which should fit the User Port 
on the back of your VIC. Then get a joystick con- 
nector (subminiature D type, nine-pin). It looks 
like the original game port on the side of your 
VIC and a joystick should plug into it. When you 
have the connectors, make the following connec- 
tions between them. Most connectors have the 
pins lettered right on them. If yours don’t, the 
VIC manual and the VIC-20 Programmer's Reference 
Guide contain complete pin diagrams. (See the 
figure.) 


VIC Joystick Plug 





The filled-in holes represent pins which are used. 
You will notice that this is a mirror image to the 
diagram which is in your VIC book. 

Here's what each pin does: 


Pin number 


Description 





anew 


Ground 


Simply connect these pins to a 24-pin edge con- 
nector as follows: 


1 to E 
2 to F 
3 to H 
4 to D 
6 to J 

8 to A 


The 24-pin edge connector then plugs into 
the user I/O port on the back of the VIC, which 
has this configuration. 


VIC User Port 
abi: 





A Game For Two Joysticks 


“Tank Mania” is a fast, action-packed game for 
two players, in which each player commands a 
tank maneuvered by a joystick. The object is to 
destroy your opponent's tank. Blockades and 
mines provide natural hazards. You can remove 
these hazards by shooting them. If you shoot 

a mine on the border, you can wrap around 
the screen—try it and you will find the results 
interesting. 

The skill level is set in the first line of the sec- 
ond program. By changing the value of SL, you 
can control the number of blocks and mines. Fi- 
nally, the tanks will go between blocks diagonally 
despite the tight fit. 

The first program creates the special charac- 
ters, prints instructions, and loads Program 2. 
Before loading the second program, the first pro- 
gram deletes itself, so if you RUN the first program 
before saving it you will lose it. 

Since Tank Mania is such a long game, you 
can get a tape copy by sending a cassette, $3, and 
a SASE to: 

Ken Gibbons 

356 East 900 North 

Logan, UT 84321 


See program listings on page 160. @ 





SB Cie D EMS H nny) 
+ na reu rss 
Pins to which connections are made are marked with an 
asterisk(*), 


When you have finished, plug the connector 
into the user port, plug in your second joystick, 
turn on the VIC, and enter this short program: 


1 DA=37136+:POKEDA,@ trem 65 
2 GOSUB 16 trem 19 
3 PRINT" {CLR}J@ Jl 32 33 FB" srem 13 
4 PRINT J0;31;32;33;FB trem 35 
5 GOTO 2 trem 160 
1@ P=PEEK(DA) :J0=-((PAND4)=6) :J1=-((PAND8 


)=6) :32=-((PAND16 )=G) :J3=-((PAND2)=@) 
rrem 52 


11 FB=-((PAND32)=@):RETURN trem 5 


This program demonstrates the use of the 
second joystick. When the joystick is pushed in 
any direction, the corresponding variables are set 
to one. The fire button, when pushed, sets FB to 
one regardless of the joystick’s direction. Use the 
routine in lines 10 and 11 whenever you want to 
read the new joystick. The new joystick works 
just like the original. In fact, the only difference is 
the address of the VIA ports used. ‘ 

Use the second joystick any way you like. 
You can leave the original game port free for 
paddles or a light pen. However, the light pen 
and paddles will not work if plugged into the 
new game port. 
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LOW COST SOFTWARE 


Are you tired of paying high prices for your software? 
Let John Henry Software save you money! 


We distribute public domain software for your VIC 20™ 
or Commodore 64™. We've tested and documented each 
Program to guarantee you hours of fun and useful 
learning experiences. We specialize in prompt delivery 
of your software, even if you order tapes, and we 
guarantee our product. 













You'll also receive our free program reference book 
when you place your order. 


VIC 20 







Group VG 
Group VP 






and Home .... 
35 Educational Programs . 


COMMODORE 64 


26 Games for Everyone.............. $ 
30 Programming, Demo, Business 

and Home 
Group CE 16 Educational Programs . 
Group CA 5 Adventure Games (disk only) . 


When ordering, specify group and tape or disk. 
Send check or money order payable to: 
John Henry Software 
P.O. Box 39021 
Cincinnati, Ohio 45239 


Don't wait! Order your software today! Or write for your 
free program reference book. You'll be glad you did! 






Group VE 











Group CG 
Group CP 













To keep our software prices low, our ad will only appear in the June, August, 
October and December issues of this magazine 
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Finding Incorrect 
DATA Statements 


Bruno Degazio 


If you've discovered a clever time-saving tech- 
nique, or a brief but effective programming 
shortcut, send it in to “Hints & Tips,” c/o Com- 
PUTE!’s GAZETTE. If we use it, we'll pay you $35. 
a ea aaa 


Here is an easy-to-use technique for finding mis- 
typed DATA statements. 

DATA statements are great for rapidly POKE- 
ing numbers into memory, whether it’s for a 
machine language program, a musical composi- 
tion, custom characters, or some other purpose. 
You simply program a FOR-NEXT loop, READ 
the data, and POKE. 

Consider the following program: 


SC=1024: 
DED) OR 4996 (8K+ EXPANSION) 
PRINT" {CLR} **# eee 

FOR J = SC TO SC+5 

READ K: POKE J, K 

50 NEXT J 

60 REM (MORE PROGRAM LINES) 

586 DATA 26,5,19,20 

510 DATA 999 


16 


REM FOR VIC USE 7680 (UNEXPAN 
trem 9 


20 
30 
49 





If you RUN the above program, you will get 
an ?ILLEGAL QUANTITY ERROR IN 40—but 
there’s nothing wrong with line 40. It simply reads 
a number and tries to POKE screen memory. The 
real problem is line 510 and the number 999. You 
can POKE memory locations only with numbers 
from 0 to 255. The number 999 is out of range and 
stops the program in line 40, Even though the 
error message tells you to look at line 40, you really 
have to correct line 510. 

Searching through a list of DATA statements 
can be annoying, especially if there are lots of 
them. 

There is a simple way of finding the incorrect 
DATA statement. Memory locations 63 and 64 
contain the line number of the last DATA state- 
ment used. It is stored in low byte/high byte for- 
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mat. To find the offending DATA line, type this 
in immediate mode (without a line number): 


PRINT PEEK (63) + PEEK(64)*256 


You can then LIST that line to find the item 
that caused the problem. An incorrect DATA state- 
ment is usually the result of a missing comma or a 
number that was accidentally typed twice. No 
matter how careful you are, mistakes will some- 
times creep into your typing. But this pro- 
gramming tip should reduce your debugging time. @ 














| GET THE MOST FROM 
YOUR VIC-20/C64 


CASSETTE INTERFACE 
USE ANY PORTABLE 
CASSETTE RECORDER 
CONTROLS THE CASSETTE 
MOTOR 
MAKE COPIES OF ANY 
i] TAPE PROGRAM 

© SATISFACTION GUAR- 


ANTEED 

} © ONLY $34.95 PLUS$1.60FOR 

| SHIPPING 

FULL RS232 INTERFACE 

© CONNECTS TO USER PORT 

@ FULL RS232 CONVERSION 

* CONNECTS ANY STANDARD 
MODEM OR SERIAL PRINTER 


COMES WITH TYPE IN BASIC 
TERMINAL PROGRAM 
SATISFACTION GUARANTEED 
ONLY $39.95 PLUS $1.60 FOR 
SHIPPING 


| ADD $2.50 EXTRA OUTSIDE US, CANADA OR MEXICO ! 
SEND TODAY FOR OUR FREE CATALOG 


SEE YOUR LOCAL DEALER OR CALL: 
(206) 236-BYTE 


Formerly BYTESIZE 


OMNITRONIX (site canoiowy ) 


| PO BOX 12309 DEPT.FG 
| SEAT 


















ic-20/0 
aikere 
mEBEAGe 



































For CBM-64 
and VIC 
owners only: 


This is just 1 of 
20 pages of the 
newest and biggest 
Skyles catalog, hot 
off the press. 







We know you'll 

want this page, in From Skyles 

its full 7 x 10 Electric Works, the 
splendor, and sending you your oldest and largest 
another 19 pages very own copy professional 

of peripherals, within the last few specialists in the 
software and books _ weeks, call us at business. 

that will make your (800) 227-9998 

CBM-64 or VIC (unless you live 

computer even in California, in Skyles Electric Works 
nicer to live with. which case call 231-E S. Whisman Road 


So, if we missed (415) 965-1735. Mountain View, California 94041 





CHARLES BRANNO! 
PROGRAM EDITOR 


Many people are searching for an alternative to 
BASIC. BASIC is easy to use, easy to learn, and 
almost carefree in style and coding. Yet BASIC is 
not as fast as a high-level language can be. It does 
not encourage or support modular or even struc- 
tured programming. It is a very general language, 
so it lacks commands specific to certain situations, 
such as graphics, games, business/professional 
applications, and mathematical work. It’s also 
hard to teach and grade (compared to a language 
like Pascal). 

The microcomputer world knows several 
languages which have come down to earth from 
the mainframe computers: COBOL, FORTRAN, 
Pascal, PL/I, LISP, APL, even ALGOL. Languages 
which work out particularly well on micros include 
BASIC, of course, PILOT, Logo, C, and Forth. 
These languages work well within the speed and 
memory limitations of many personal computers. 

The business community has been trans- 
forming its software choices by adapting the larger 
languages (COBOL, FORTRAN) to 64K Z80 CP/M 
(Control Program for Microprocessors) com- 
puters. These languages are often subsets of the 
minicomputer versions of the languages. They 
are smaller versions of the languages, but are still 
quite powerful and flexible. 


CP/M And The 64 


Many Commodore 64 owners, especially educators 
and businessmen, are intrigued with the Commo- 
dore CP/M cartridge. It appears to be a gateway to 
the many thousands of programs that will run only 
ona CP/M system, 

CP/M offers the 8080 or Z80 programmer a set 
of general, transportable microprograms. These 
microprograms are customized to each computer, 
yet act the same from a program’s point of view. 

These microprograms make up the Basic Input/ 
Output System, or BIOS. The BIOS is much like the 
64’s set of Kernal routines, which enable a 6510 
machine language programmer to work with input 
and output. The Kernal’s strongest point is that its 
routines have the same addresses (entry points) on 
many Commodore machines. For example, there’s 
a machine language program at $FFD2 (hexadeci- 
mal) that lets you output a single character to the 
screen or current output device (perhaps the printer 
after a CMD). You can try out this routine from 
BASIC with POKE 780,ASC(‘x”):SYS 65490. x is 
the character you want to print, so put it inside 
double quotation marks. 

All eight-bit CP/M programs are written in 
either 8080 or Z80 machine language. These micro- 
106 COMPUTE!’s Gazette April 1984 


HORIZONS: 64" 





processors and the commands they use are not 
compatible with the 6510, so you need to adda 
microprocessor to the computer. The Commodore 
CP/M cartridge contains a Z80 microprocessor and 
plugs into 64’s expansion port. It also contains cir- 
cuitry that permits the 64 to switch between the 
6510 and the Z80. But you don’t have CP/M yet. 
CP/M is supplied on a disk that you load into your 
64 before you begin working with CP/M. 


The Disk Problem 


It takes a long time to load. The Commodore 1541 
disk drive is not fast. To be frank, itis one of the 
slowest disk drives on the market. Don’t feel bad, 
though, it is also about the least expensive. CP/M, 
however, was written for machines with fast, ex- 
pensive disk drives. It is highly disk-intensive. It 
accesses the disk frequently for the various utilities 
it performs. The 1541 is the weak link in 64 CP/M. 
Programs behave sluggishly. 

But that is not what makes CP/M unusable on 
the 64. CP/M adds great capability and potential, a 
whole new world. But as you found out when you 
brought your 64 home, it takes software to make 
your computer do anything. And that’s what's 
missing from Commodore CP/M. 

Sure, there are probably 10,000 CP/M programs 
out there, maybe more. But there’s one big point of 
incompatibility in the world of CP/M: disk formats. 
Just as you can’t even read an Apple or Atari disk 
on your 64, many CP/M computers cannot inter- 
change disks. The BIOS is general, but other things 
like screen formatting and cursor control are not. 
CP/M often requires 80 columns, which isn’t easily 
workable with 64 CP/M. 

So COBOL, FORTRAN, and WordStar are avail- 
able with CP/M, but there are no disks you can buy 
which your 1541 can read. Commodore has some 
plans to release some 1541-readable CP/M software, 
but we've yet to see it. 

Dedicated “hackers” or machine language 
programmers may be interested in CP/M. They 
can write programs which switch between the 
6510 and Z80, getting a chance to learn about 
another microprocessor, and enjoying the best of 
both worlds. 

Some third-party companies are charging 
upwards of $300 for CP/M (although many do 
have some CP/M software that can be used with 
the 64). Commodore should be applauded for 
making CP/M available for about $60. No other 
company has sold CP/M, including the necessary 
hardware, for so little. But right now we're waiting 
for an encore. @ 








We had a problem. So we invented 
PC-DocuMate™ to solve it. The problem was 
how to quickly master the VIC-20 and 
CBM-64 keyboards and easily start pro- 
gramming in BASIC on our new personal 
computers. First we went through the 
manuals. 


INCONVENIENT MANUALS. 

The user's guide was a nuisance and the 
programmer's reference manual was |ust 
plain inconvenient to use. We found the 
control key combinations confusing and the 
introduction to BASIC to be too “basic” for 
our needs, We needed a simple solution to 
our documentation problems, 

So we decided to surround the keyboard 
of each PC with the information we wanted. 
We decided to print whatever we needed on 
sturdy plastic templates which would fit the 
keyboard of either the VIC-20 or Commo- 
dore 64. 


SIMPLE SOLUTION 

This was the simple solution to our prob- 
lem, Now we could have the essential 
information right at our fingertips. 

On the left side and top of the templates. 
we put BASIC functions, commands, and 
statements. On the lower left we used key 
symbols to remind us of how to use SHIFT, 
RUN/STOP, CTRL and the "Commodore’ 
key. Over on the bottom right side we put 
some additional keys to help remember 
about CLR/HOME and RESTORE. But we 
were still a little confused. 


STILL CONFUSED 

We found we were confused about music 
programming, color graphics, and sprites, 
On both the VIC-20 and the CBM-64 tem- 
plates we carefully organized and summar- 
ized the essential reference data for music 
programming and put it across the top— 
showing notes and the scale. All those 
values you must POKE and where to POKE 
them are listed, 

Then to clarify color graphics we laid out 
screen memory maps showing character 
and color addresses in a screen matrix. (We 
got this idea from the manuals.) 

For the VIC-20 we added a complete 
memory address map for documenting 
where everything is in an expanded or 
unexpanded VIG 


For the Commodore 64 we came up with 
a really clever summary table for showing 
almost everything you ever need to know for 
sprite graphics 


GETTING EASIER 

Now we had organized the most essential 
information for our VIC and 64 in the most 
logical way. BASIC, music, color graphics, 
and sprites all seemed a lot easier, Our 
initial problem was solved by PC-Docu 
Mate™ 

But we have a confession to make 


WE CHEATED 

We had solved this kind of problem 
before. In fact, many times before. You see, 
we at SMA developed the original PC-Docu- 
Mate for the IBM PC. We've made templates 
for IBM BASIC and DOS, for WORDSTAR™, 
VISICALC™ and other best-selling software 
packages for the IBM PG 

So we knew we could invent another 
PC-DocuMate™ to solve our problems with 
the VIC-20 and Commodore 64, Now our 
solution can be yours and you can join the 
thousands of satisfied users of our template 
products, 

Take advantage of our experience and 
success with PC-DocuMate templates. Get 
‘one for your personal computer. 


SOME SPECIFICS 

Our templates for the VIC and 64 are 
made from the same high quality non-glare 
plastic as the more expensive IBM PC 
versions 

The templates are an attractive gray 
color and are imprinted with a special black 
ink which bonds permanently to the plastic. 
They are precision die-cut to fit your 
keyboard 

Unlike some other products we've seen 
in this category, PC-DocuMate templates 
are professionally and expertly designed. 
And they are fully guaranteed, 


OUR GUARANTEE 
We guarantee your satisfaction You must 
be satisfied with your PC-DocuMate for your 


VIC-20 or CBM-64. Try it for 10 days and if 
for any reason you are not satislied return it 
fo us (undamaged) fora full refund. No risk. 





That's what we said when our new 
“invention” solved all our VIC-20™ and 
Commodore-64™ programming problems 


SOLVE YOUR PROGRAMMING 
PROBLEMS WITH PC-DocuMate™ 

Order your PC-DocuMate today (by 
phone or mail) and solve your VIC-20 or 
CBM-64 programming problems. Send only 
$12.95 and specify which computer you 
have. We pay for shipping and handling 
Use the coupon below or call 919-787-7703 
for faster service. 


YES! Please RUSH me 
templates and/or CBM-64 tem- 
| plates at $12.95 each. | have enclosed 
bys 

| Check —_ Money order __MC/VISA — 
| 











Name 








| oy State Zip 
| 
| 

Card # Exp 





Signature | 


| 
| Foteign orders (except Canada) add $5.00 US| 


| Mail to: Systems Management Associates 
3700 Computer Drive, Dept. J-1 
| P.O, Box 20025 

Raleigh, North Carolina 27619 | 








\VIG-20 and Commodore 64 are trademarks of Commodore Busi- 
ness Machines, Inc 


‘Ad no. 731 Copyright 1983, SMA 
Dealer inquiries invited. 


Variable Storage: 
A Beginner’s Tour Of BASIC 
RAM For VIC And 64 


Pete Marikle 


You can simplify the search for program bugs 
if you take a short tour through BASIC RAM 
and use this subroutine that displays variable 
values. 

aed 


Normally, you don’t need to know what happens 
to your program when you type RUN. The BASIC 
interpreter takes over, leaving you free to use the 
computer to figure your income tax, write a letter, 
or save the galaxy. 

When your program crashes, though, or gives 
you an incorrect result, you have to switch from 
computer user back to programmer, locate the 
bug, and fix it. Debugging is easier if you can 
look at the values of your variables and arrays 
while the program is running, to be sure that loops 
are being completed and data are being put in the 
right place at the right time. 

Programs 1 and 2 are different versions of a 
subroutine that displays the current values of all 
program variables. By inserting STOP statements 
in any line where you suspect a problem, you can 
“freeze” the action and GOTO the subroutine to 
check your logic, statement by statement. 


A Quick Tour Of RAM 


Before we examine the subroutine, let’s take a 
sightseeing tour through BASIC RAM for a quick 
look at where your VIC-20 or 64 stores your pro- 
grams and variables, how it tells a string from an 
integer variable, and how you might use less mem- 
ory by doing a few things differently. You don’t 
have to take the tour in order to use the subroutine, 
but it will give you a better idea of how the sub- 
routine works. 
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First, type in this short BASIC program that 
allows you to peek into the computer’s memory: 
1@ S=256:PRINT"(CLR}START ADDRESS": INPUTZ 






FORX=ZTO(PEEK(55)+S*PEEK(56) ) :PRINTCHR 
$(144)X, PEEK(X)SPC(2)CHRS$ (PEEK(X) ) 
trem 35 





35 Y=X+1:U=PEEK(45)+S* PEEK (46) : V=PEEK(47) 
+S*PEEK (48) :W=PEEK(49)+S*PEEK(50) 

rrem 81 
4@ IFY=UORY=VORY=WTHEN PRINTS$ rrem 44 
45 IFX>=UANDY<VTHENT=T+1:GOTO47 = :rem 44 
46 T=0 rem 43 
47 IFT THEN IFT/7-INT(T/7)<.O1THENPRINTT$ 

srem 232 
5@ WAIT 197,32:NEXT trem 69 


6@ REM END OF PROGRAM APPROACHING:rem 250 


If you want to use this program again, you should 
SAVE it to tape or disk. 
Now enter these samples in direct mode: 
AB =12.34:CD = ~12.34:AB$ ELLO”:AB% = 1983: 
AB(1) = 111:CD(1) = -111:AB%(1) = 1024:AB$(1) = 
“BYE” 
Hit RETURN, and enter some more: 


DIMCDS§(3,5,5):CDS(1,0,0) =”"SEE”:CDS(2,0,0) = 
“YOU":CD§$(1,1,1) ="LATER” 

Hit RETURN again, and your computer will have 
at least one of every type of variable stored in 
RAM. Now type GOTO 10 and RETURN. Do not 
type RUN (RUN resets all variables). Respond 
to the prompt with 4300 as a start address for the 
unexpanded VIC, 1230 if you’re working ona 
VIC with 3K expansion or Super Expander and 
4800 if your VIC has 8K or more expansion mem- 
ory. For the 64, respond with 2250. 


















DUNGEONS, 


Pere: 





AARDVARK LTD. 


VIDEO ADVENTURES” 


DUNGEONS OF MAGDARR - Serious 
D of D for up to 8 players. 
Features full 3d GRAPHICS! 
You get a choice of several 
characters that grow from 
game to game and are 
interchangeable with char- 
acters from our famous 
Dungeons of Death game. A 
real dungeon with level after 
level of monsters to conquer 
and treasures to find - all in 
hi-res 3d graphics. 


‘Available On: TRS800, IBM PC, CMD64 
TAPE $1995 DISK $2495 


QUEST - A different kind of 
Graphic Adventure, it is 
played on a computer 
generated mape of Alesia. 
You'll have to build an army 
and feed them through 
combat, bargaining, explo- 
ration of ruins and temples, 
and outright banditry! Takes 
2 - 5 hours to play and is 
different each time. 


‘Available Onc TRSBOC 16K, CMO64, VIC20 13K, MC1O 
16K, TIQ9 (EXT. BASIC), |8MPC 


TAPE $14.95 DISK $19.95 


MARS - Your ship crashed on 
the Red Plane and you have 
to get home. You will have to 
explore a Martian City, 
repair your ship, and deai 
with possibly hostile aliens to 
get home again. This is 
fecommended as a first 
Adventure. It is in no way 
simple - playing time 
normally runs from 30 to 50 
hours, but it lets you try out 
Adventuring before you 
battle the really tough ones. 
Full Graphics Adventure. 


Available On: TRS80C, CMO 64, 18M PC 
TAPE $1995 DISK $2495 


BAG-IT-MAN - The ultimate 
arcade game for TRS8OC or 
MCD64. This one has three 
screens full of BAGS OF 
GOLD, CARTS & ELE- 
VATORS TO RIDE IN, MINE 
SHAFTS, and TWO NASTY 
GUARDS. Great sound and 
color and continuous 
excitement. 


Available On: TRSB0C 32K, CMD64 


TAPE $19.95 DISK $24.95 


STARFIRE - If you enjoyed 
StarRaiders or StarWars, 
you will love Starfire. It is not 
a copy, but the best shoot- 
em-up, see them in the 
window space game on the 
CMD64 or TRS80C. The 
fantastic graphics will put 
you right in the control room 
as you hyperspace from 
quadrant to quadrant 
fighting the aliens and 
protecting your bases. 


Available On: TRSBOC 16K, CMD64 


TAPE $19.95 DISK $24.95 


PYRAMIO - ONE OF THE TOUGHEST 
ADVENTURES. Average time 
through the pyramid is 50 - 
70 hours, Clues are 
everywhere and some 
ingenious problems make 
this popular around the 
world. FULL GRAPHIC 
ADVENTURE 


‘Available On: TRSBOC 16K, CMD64, MC10 16K IBM PC 
TAPE $1995, DISK $2495 





NEW! GRAPHIC ADVENTURES 


AARDVARK offers over 120 original high quality programs. Authors - AARDVARK pays top dollar for high quality 
Send one dollar for a current catalog and receive a $1.00 programs. Send a copy today for a personal review and 
gift certificate good towards your next purchase. editorial help. 


TO ORDER: Send amount indicated plus $2.00 shipping, per order. Include quantity desired and your preference of tape or disk. 
Be sure to Indicate type of system and amount of memory. When using charge card to order by mail, be sure to include expiration date, 


1-313-669-3110 


PHONE ORDERS ACCEPTED 


=o 
CHARGE CARDS. VISA 8:00 a.m. to 8:00 p.m. E.S.T., MON-FRI 


WECCOME: a) 


AARDVARK section Software 2352 S. COMMERCE © WALLED LAKE, MI 48088 * (313) 669-3110 


CmM064 / TRS80C / IBMPC / VIC20 / TI99 





The Program Looks At Itself 


The space bar is your one-touch control. Hold it 
down until the screen is nearly full, then sit back 
and take a look. You are looking at the middle of 
the tour program, with the memory addresses on 
the left, memory contents in the middle, and some 
interesting characters on the right. 

Some of those characters are meaningless, 
because a CHR$ interpretation of the contents of 
a memory location is invalid and out of context if 
the location contains a keyword, line link, line 
number, etc, But many of the characters are valid, 
recognizable translations of what you put into the 
program, and these are the ones we care about. 

Use the space bar to scroll another hundred 
or so bytes onto the screen. We’re looking for the 
end of the BASIC program, represented by three 
consecutive zeros in the center column. It’s not 
hard to find with our REM billboard (line 60) and 
neat borders in place. Now look at the first address 
after the three zeros. That’s the PEEK 45/46 ad- 
dress (the address produced by PEEK(45) + 256* 
PEEK(46) in line 35). Hold the space bar down 
until that address is near the top of the screen. 


Looking At Variable Storage 
We're now in the area where strings and variables 
are stored. Everything in this area is in seven-byte 
clusters, and the program neatly separates those 
clusters for easy viewing. Find the characters A 
and B, followed by five more bytes (the cluster is 
followed by the character C). This first seven-byte 
cluster is the variable AB. The first two bytes are 
the variable name. The next five bytes contain the 
value we gave to AB, in floating-point arithmetic 
notation. Don’t worry about how the math works 
for now. Suffice it to say that your decimal value 
is neatly tucked away in those five bytes. 

Note that the next variable, CD, has a similar 
structure. Remember that we gave CD the same 
value as AB, but negative. Take a close look at the 
five bytes following CD, and you'll see that values 
there are almost identical to the values in the bytes 
following AB, except that the second byte contains 
a value which is 128 greater than the correspond- 
ing byte in AB. (If you subtract 128 from the byte 
in CD, you should get the value in the corre- 
sponding byte in AB.) The high-order bit (Bit 7) in 
that particular byte is used as a sign indicator: 0 
for positive numbers and 1 for negative. Since 
that bit is on (1) for variable CD, the decimal value 
of the byte is 128 (2”) higher. Your computer ig- 
nores that bit in reconstructing the value of CD, 
but uses the bit when the time comes to determine 
the sign of the number. 


String Variables 
Press the space bar and look at the next cluster, 
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representing the string variable AB$. The A is 
clear enough, but where did the B go? Here’s the 
secret: The second character of a string variable 
name is stored after adding 128 to the normal 
CHR¢ value for that character, It’s that high-order 
bit trick again. 

By checking to see if this high-order bit is 1 or 
0, your computer can tell whether this is a string 
variable or floating-point variable. Note that 194 
minus 128 is 66, the CHR$ value for the Bin AB$. 
Your computer now knows that the next byte (a 5 
in our case) is the length of AB$ and the next two 
bytes will give it the address where it can find the 
actual characters you designated for AB$. The 
address is in standard low byte-high byte order 
(LB + 256*HB = decimal address). The computer 
will start at that address, to select a number of 
characters equal to the value (5) in that length 
byte, and then go on to do whatever you asked it 
to do with the string. The final two bytes of the 
cluster are zeros put in to fill the seven-byte 
cluster. 

That address for the string character can point 
to one of two very different areas of memory. If 
the string is assigned in the direct mode, the string, 
characters themselves are stored at the top of free 
BASIC RAM. If the string is assigned by the pro- 
gram, the address points to the place in the pro- 
gram itself where the string values are assigned 
to the variable name. Since the characters must be 
stored as part of the program anyway, your com- 
puter doesn’t waste RAM by repeating the char- 
acters in the variable storage area. 


An Unreadable Name 


Continuing our tour with the seven bytes im- 
mediately following the AB$ cluster, note that the 
variable name is unreadable. The symbols are a 
spade and a vertical bar, next to the 193 and 194. 
Subtract 128 from each and you'll find the CHR$ 
values for the A and Bin the integer variable AB%. 
When both characters in the name are greater 
than 127, your computer knows this is an integer 
variable, that only the next two bytes need be 
looked at to obtain the value of this integer vari- 
able, and that the last three bytes of the cluster 
will be filled with zeros. 

Those two value bytes contain a signed binary 
number, a different form than we saw with the 
floating-point variables. Again, don’t worry about 
the details of the math. The more compact method 
of storing integer variables doesn’t do much for 
you until you start using them in arrays, Integer 
arrays can cut your memory consumption 
considerably (two bytes vs. five per entry). 

Let’s move on to look at arrays in more detail. 
Hold down the space bar to pass by some other 
clusters where the variables in this tour program 
are stored. We're approaching the special address 


held in PEEK 47/48, which is the beginning of 
array storage. You'll know you're there when you 
see the borderline and the clearly visible A and B 
characters in the right column. 


How Arrays Are Stored 

There are three kinds of arrays, paralleling the 
three normal variable types: floating-point arrays, 
integer arrays, and string arrays. Each can be 
multidimensional, but we'll cover that situation 
last. Your VIC or 64 allows you to use arrays with 
up to 11 elements (numbers 0-10) without a 
DIMension statement, but it does not reserve space 
for the array until you assign a value to one of the 
array elements. As soon as you do, it will set up 
an entire 11-element array, even if you only used 
one or two elements. Of course, you can DIM for 
more or fewer elements if you wish. (For more 
information on arrays, see ‘How To Use Arrays” 
in the February issue.) 

Each one-dimensional array begins with a 
seven-byte definition cluster followed by the 11 
element clusters (or more or less according to the 
DIMension statement). 

The seven-byte cluster will hold the array 
name in the first two bytes, following the same 
general rules we saw for the simple variables, 
depending on the type of array. The next two 
bytes will contain a link address to the next array 
set. The fifth byte tells you (and your computer) 
the number of dimensions in this array. The sixth 
and seventh bytes will show the total number of 
elements in the array set (11 for our un-DIMed 
examples). These two bytes store the total in re- 
verse high byte-low byte order. 

The element clusters that follow the definition 
cluster will each be five bytes long for floating- 
point arrays, two bytes long for integer arrays, or 
three bytes each for string arrays. These clusters 
contain the same kind of information held in the 
corresponding normal variables, but without the 
need for trailing zeros or repeated label bytes that 
are needed in variable storage. 


Unused Elements Contain Zeros 
Hold down the space bar until the first array, AB, 
nearly fills the screen, See the seven-byte cluster? 
It’s followed by five zeros only because AB(0), the 
first element of this array, has a zero value. The 
next five bytes represent the value we gave to 
AB(1). The following sets of zeros represent the 
remaining unused elements through AB(10). Use 
the space bar to look at the CD array, then continue 
to the AB% integer array. 

Again, a seven-byte definition cluster, fol- 
lowed this time by 11 element clusters that are 
each two bytes long. The lesson in saving memory 
with integer arrays is dramatic. 

Next, note the seven-byte cluster for the AB$ 


array and its 11 three-byte clusters, each con- 
taining the string length byte and the address of 
the string characters. 


The Three-Dimensional Array 
Finally, we reach our sample multidimensional 
array. Things get a bit tricky here, so follow 
closely, The definition cluster will now be more 
than seven bytes long. Add two bytes for each 
extra dimension. Remember, you can set up two, 
three, four, or more dimensions of any size if you 
have the total memory capacity to handle them. 
The number of dimensions for each array set will 
be held in the fifth byte of the definition cluster. 
The very next two bytes will hold the number of 
elements in the Nth dimension (N=number of 
dimensions); the next two will hold the number 
of elements in the (N -1)th dimension, and so on 
until finally the first dimension is structured. 

Immediately following the definition cluster, 
the array elements will troop by in orderly forma- 
tion. For our sample, which we DIMed as 
CD$(3,5,5), the order of the three-byte clusters 
will be: CD$(0,0,0), CD$(1,0,0)....CD$(3,0,0), 
CD$(0,1,0),CD$(1,1,0)....CD$(3,1,0)......+++ ete... 
until finally reaching CD$(3,5,5). 

As you pass through this area, you will see 
that the clusters for CD$(1,0,0) and CD$(2,0,0) are 
occupied. If you count, you'll find that the position 
for CD§(1,1,1) is also occupied, as we directed. 
As with any string, the characters themselves are 
stored elsewhere. 

If you race on now through the rest of this 
array, you'll cross the PEEK 49/50 border into the 
area of unused RAM. Don’t be surprised if you 
recognize some of it. You may find remnants here 
from other programs which have been NEWed, 
or CLRed variables. 

To end the tour, just hold down the RUN/ 
STOP key and hit the space bar. 


The Variable Dump Utility 


Now let's try out the promised subroutine. Be- 
cause it takes all the values stored in a section of 
memory and sends them to an output device, our 
subroutine is called a dump utility. Type NEW to 
get rid of the tour program, type in Program 1, 
and SAVE it to tape or disk. 

The dump utility has high line numbers be- 
cause it is designed as an easy add-on to existing 
programs using the VIC quick append method 
(see COMPUTE!, March 1983). Commodore 64 
owners will find it necessary to abbreviate the 
PEEK statements in line 44580 with P SHIFT-E in 
order for the line to fit within the 64’s 80-character 
limit. 

Type ina few sample variables in direct mode. 
You can reenter the previous sample set if you 
like. Again, do not type RUN; enter GOTO 44444 
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and RETURN, Your variables should be displayed; 
the program won't display the arrays until you 
press the space bar. Note that the dump utility 
doesn’t list the contents of multidimensional ar- 
rays. It’s not hard to do, just time-consuming. 
The routine will simply tell you which multi- 
dimensional arrays have been implemented and 
what their dimensions and element sizes are. 


Pointer Settings Affect The 
Utility 


Now CLR your variables, enter this new tempo- 
rary program step, and RUN the program again: 

10 A$="HELLO”:A = 1983:AB$(2) =““HELLO 

AGAIN” 
Not much happens, because it ends at line 44443, 
the subroutine protector. Type GOTO 44444 to 
view your variables as before. Now fora surprise— 
when you type GOTO 44444 and hit RETURN 
once again, you will see a display of the variables 
used in the dump utility. 

This happens because, on the first pass 
through the routine, line 44444 reads the pointers 
before they are changed to make room for the 
routine’s own internal variables. On the second 
pass, the new pointer values include the storage 





areas for the new variables. If you don’t ever want 
to see the internal variables, just modify line 44543 
to read: 


IF PEEK(ZZ) =90 THEN RETURN 


Tailor The Utility For Your Needs 


You can customize the routine to fit your needs. 
For example, if you don’t need the array and in- 
teger variable features, just delete lines 44465, 
44525, and everything from 44700 on. That'll leave 
you with a much trimmer 800-byte package that 
will still dump all normal string and floating-point 
variables. If you delete one of the simple variable 
subroutines, though, you should also delete the 
corresponding array variable type. Crunch out 
the REMs and spaces and you'll end up witha 
tidy utility of well under 600 bytes that'll still fill 
most needs. Program 2 is this condensed version. 
To use your dump utility as a debugging tool, 
simply insert STOP statements at desired points 
in your program, type GOTO 44444, analyze vari- 
able values, and then type CONT to continue to 
the next break. Add the appropriate printer com- 
mands, and the program will dump to the printer. 


See program listings on page 161. @ 


We'll back you up! 


ATTENTION COMMODORE 64 OWNERS 

If you own a disk drive then you'll need “The 
Clone Machine”. Take control of your 1541 with this 
package that includes: 


1.) Complete and thorough users manual 
2.) Copy with one or two drives 

3.) Investigate 
“PROTECTED” disks 


4.) Copy all file types including relative types 


5.) Edit and view track/block in Hex or ASCII 
6.) Display full contents of directory and print 


7.) Change program names, add, delete files 


with single keystroke 
8.) Easy disk initialization 
9.) Supports up to four drives 


Lis 1S 


Dealers & Distributors 
Inquiries Invited 
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Special intro £39.95 q 
CALL (201) 838-9027 


and back-up many 


Mero P.O. Box 113 
=I co Pompton Plains, N.J. 
=WAPre 07444 








ViCreations 


Dan Carmichael, Assistant Editor 


VIC Chip Utility 


This month we'll look at a utility that will ad- But if you choose the high-memory option, the 
just your screen, change the screen and border program automatically relocates into the top page 
colors, or reset the VIC chip at the touch of a (256 bytes) of BASIC memory, no matter which 


finger. memory expansion cartridge you may be using. 
The high-memory version automatically seals 
itself off so it is protected from BASIC. And be- 


cause the program is interrupt-driven, you can 
leave it running while you're programming, or 
even while running your BASIC program, But 
remember, the program will be clobbered if you 
choose the tape cassette buffer option and the 
cassette drive is used. 

Type in the program, and SAVE it on tape or 
disk. Heed the usual warning about machine lan- 
guage programs: One mistyped DATA statement 


Allocating time on the family TV set can sometimes 
bea problem. In many households, nightly TV 
programs take precedence over computer use. In 
fact, I do most of my programming on an old black- 
and-white set that sat, unused, in the garage for 
years, and use the family set only to check colors, 
etc. However, the picture on the black-and-white 
set is way out of adjustment. The screen is shifted 


souar.to the right that every line of print is can freeze up the VIC, so SAVE the program before 
é you RUN it. The program will pause a few seconds 


The VIC chip has the answer to this problem. F F 
The 6560 Video Interface Chip (for which your eee inhi Gheqeitin 


VIC was named) is a versatile chip that controls 
everything from horizontal and vertical screen The Starting Address Is 
adjustments to color generation, sound, volume, 

and more. The VIC chip registers are located at Displayed 

























addresses 36864 to 36879. The program initially displays a brief page of in- 
Some aberrations in your TV set canbe cor- _ structions. At the top of the screen you'll see the 
rected by simply POKEing various locations on _ Starting address. To start the program, SYSnnnn 
the VIC chip. But this can be time-consuming where nnn is the number displayed on the in- 
because every time the VIC is turned off or on, struction page. The program can be stopped by 
reset, or RUN/STOP—RESTOREd, the VIC chip _ pressing the RUN/STOP—RESTORE combina- 
is reset, and the registers have to be rePOKEd. sor Be ow. asia char alowang the various keys, 
and how they control the program: 
One-Finger Adjustments z Ene 
To solve this problem, I designed a “VIC Chip Function | After Typing After Typing 
Utility.” With this machine language program Keys S = 
and one finger, you can adjust the TV horizontally fl move screen ine. screen/ 





or vertically, or change the screen/border color bordecbyi 


combinations. You can also reset the VIC chip to 
its original settings. 

The program is also relocatable. This means 
that it can be placed in the cassette buffer or in 
high memory at the top of BASIC RAM. If you 
select the cassette buffer option, the program 
does not use any of your available BASIC RAM 





vic 
chip 
reset 







inc. screen/ 
borderby10 
dec. screen/ 
borderby10 















inc. =increment 
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The speed of the screen and border color changes 
can be controlled by POKEing memory location 
251. POKEing a value of 1 causes the color combi- 
nations to change the fastest. Values between 2 
and 255 will slow them down; the higher the 
number, the slower the changes. The program 
automatically defaults to a 0, the slowest value. 
For you machine language programmers, memory 
location 251 ($FB) is READ only once by the VIC 
Chip Utility, so this valuable zero page space is 
still available to you. 

After the program has been run and the 
machine language program POKEd into memory, 
you may NEW the BASIC program—it’s not 
needed. The utility can be used as a programming 
aid. To find the best visual display, experiment 
with the screen and border color combinations. 
When you see a color combination you like, type 
PRINT PEEK(36879). This will display the current 
color combination’value. You may use these color 
combinations in your BASIC programs by POKE- 
ing 36879 with the same number. 


Screen Adjustment Locations 


The registers (memory locations) that control the 
vertical and horizontal screen adjustments are 
36865 (vertical) and 36864 (horizontal). The utility 
simply POKEs various values from 0 to 255 here 
to move the screen. You can use these same mem- 
ory locations to simulate a scrolling effect. Enter 
and run this following short BASIC program 
which will scroll the screen in all four directions: 
1@ FORA=25T0140:POKE36865,A:NEXTA :rem 1 
20 FORA=14GTO25STEP-1 : POKE36865, A:NEXTA 
rrem 156 
30 FORA=5T055:POKE36864,A:NEXTA :rem 165 
40 FORA=55TOSSTEP~1 : POKE36864,A:NEXTA 
trem 64 

Notice that while the screen scrolls up and 
down, the screen format remains normal. How- 
ever, when the screen scrolls right and left, it be- 
gins to distort. This is normal for the VIC chip; 
it’s not something wrong with your computer. 

To see how you can produce interesting ef- 
fects in your BASIC program by scrolling up and 
down, enter the following short BASIC program: 
5 PRINT" {CLR}SCROLLING DOWN NOW" :rem 114 
6 PRINT" {DOWN}SEE YOU LATER!":GOSUB 166 


srem 214 
18 FORA=25TO140:POKE36865,A:NEXTA :rem 1 
20 PRINT"{CLR}SCROLLING UP NOW" rem 12 
25 PRINT" {DOWN}HELLOI" srem 222 


36 FORA=140TO25STEP-1 : POKE36865 ,A:NEXTA:G 
OSUB 100 trem 232 
49 PRINT"{CLR}SCROLLING RIGHT" trem 243 


5@ PRINT" {DOWN}BYE NOW!":GOSUB1@@:rem 135 
6@ FORA=5T055:POKE 36864,A:NEXT :rem 103 
70 PRINT"{CLR}SCROLLING LEFT" trem 163 
8@ PRINT" {DOWN}HELLO":GOSUB 168 rrem 9 
98 FORA=55TO5STEP-1 : POKE36864 , A:NEXT:GOSU 

B 100:END rrem 96 
180 FORT=1'T01000:NEXTT: RETURN :rem 133 
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As you can see, the program displays a message 
on the screen and then scrolls down until it is out 
of sight. While it is at the bottom, the screen is 
cleared, a new message is displayed, and the 
screen is scrolled up again. You can use this tech- 
nique to display any messages you wish to on the 
screen. 


VIC Chip Utility 

59609 POKE251,6:PRINT"{CLR}{DOWN}LOAD IN 
{SPACE}CASSETTE" trem 227 

59610 PRINT"{RVS)B{OFF}UFFER?" trem 169 


59028 PRINT" {DOWN}LOAD IN {RVS}H{OFF}IGH 


{SPACE} MEMORY?" trem 117 


59636 PRINT"{2 DOWN}PRESS {RVS}B{OFF} OR 
{SPACE} {RVS}H{OFF}" trem 244 
59040 GETAS:IFA$=""THEN 59040 rrem 39 


59059 IFA$="B"THEN NN=828:GOSUB69005:GOTO 
681008 rem 131 
IFAS="H"THEN POKES6, (PEEK(56)-1):CL 
R: GOSUB6 2019: GOSUB69805 : GOTO6 3800 
srem 53 
GOTO 59889 trem 60 
FORA=NNTONN+192: READB: POKEA, B:NEXT: 
RETURN srem 69 
DATA12@,169,73,141,20,3,169,3,141,2 
1,3,88,96,165,197,281,39,208,3,206, 


59069 


59876 
60085 


68018 


1,144 rrem 190 
60015 DATA 261,47 trem 64 
68628 DATA208,3,238,1,144,201,55,208,10,1 


74,0,144,224,17,248,3,238,0,144, 281 
763,208,108 trem 145 
DATA174,0,144,224,0,240,3,206,6,144 
7 201,34,208,3,32,134,3,201,8,208,3, 
32,237,3,76 rem 186 
DATA191,234,120,169,147,141,20,3,16 
9,3,141,21,3,88,96,165,197,201,39,2 
68,6,32,222 rrem 239 
DATA3, 238,15,144, 201,47, 208,6,32,22 
2,3,206,15,144,201,55,208,12,32,222 
13,24 trem 161 
DATA 173,15 trem 71 
DATA144,105,16,141,15,144,165,197,2 
@1,63,208,12,32,222,3,56,173,15,144 
7 233,108,141 srem 207 
DATA15,144,165,197,201,41,208,3,32, 
68,3, 201,8,208,3,32,237,3,76,191,23 
4,162,8,160 rem 215 
DATAG , 232, 224,255, 208, 251, 200,196,2 
51,208,246,96,169,5,141,0,144,169,2 


66838 


68040 


60055 


60055 
60060 


68078 


69088 





5,141,1,144 trem 235 
60090 DATA169,27,141,15,144,96 trem 2 
60100 PRINT"{CLR){DOWN}TO START SYS";NN 
trem 115 
60119 PRINT"(DOWN}TO STOP PRESS" :rem 80 
60120 PRINT"RUN/STOP-RESTORE" m 133 
68130 PRINT"{DOWN}TO CHANGE COLORS" 
rrem 247 
60140 PRINT"PRESS ";CHR$(34);"C";CHR$(34) 
trem 3 
60150 PRINT" {DOWN}TO ADJUST SCREEN" 
rrem 12 
69169 PRINT"PRESS ";CHR$(34);"S";CHR$(34) 
rrem 21 
60170 PRINT"{DOWN}CONTROL WITH F KEYS" 
rrem 191 
60180 PRINT"{DOWN}TO RESET VIC CHIP" 
srem 13 





60196 PRINT"PRESS ";CHR$(34);"4";CHR$ (34 
) trem 36 

60208 END em 207 

62016 NN=(PEEK(51)+256*PEEK(52)):RETURN 


rem 232 
NO=NN:GOSUB 63519: POKENN+15@,P1:POK 
ENN+151,P2 srem 16 
NO=NN+74:GOSUB 63518:POKENN+62,P1:P 
OKENN+63, P2 zrem 76 
NO=NN+162:GOSUB 63519: POKENN+94,P1: 
POKENN+95, P2 trem 134 
POKENN+104, Pl: POKENN+165 , P2: POKENN+ 
114,P1:POKENN+115,P2 rem 147 
POKENN+132,P1:POKENN+133,P2:rem 175 
NO=NN+177:GOSUB 63510:POKENN+157,P1 
: POKENN+158, P2 srem 233 


63008 
63002 


638604 





63806 


63008 
63018 


63015 NO=NN+177:GOSUB 63510: POKENN+69,P1: 
POKENN+76, P2 rrem 137 
63026 NO=NN+13:GOSUB 6351@:POKENN+2,P1:PO 
KENN+7, P2 trem 221 
63030 NO=NN+87:GOSUB 6351@:POKENN+76,P1:P 
OKENN+81, P2 trem 86 
63588 GOTO 66190 trem 46 
63510 P2=INT(NO/256) :P1=NO-(P2*256) :RETUR 
N trem 217 @ 
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VIC® 20 OWNERS 


Fulfill the 
“ expansion needs 
of your computer 
with the 


RAM-SLOT 
: MACHINE 


This versatile memory and slot expansion peripheral 
for the Commodore Vic-20 Computer consists of a 
plug-in cartridge with up to 24KBytes of low power 
CMOS RAM and 3 additional expansion slots for 
ROM, RAM and 1/0. The cartridge also includes a re- 
set button (eliminates using the power-on switch) 
and an auto start ROM selection switch. 





















#RSM-8K, 8K RAM + 3 slots. S$ 84.50 
#RSM-16K, 16K RAM + 3 slots $ 99.50 
#RSM-24K, 24K RAM + 3slots $119.50 






We accept checks. money order, Visa/Mastercard. Add 
$2.50 for shipping, an additional $2.50 for COD. Mich: 
igan residents add 4% sales tax. Personal checks— 
allow 10 days to clear. 


K2 ELECTRONICS DESIGN CORPORATION 


3990 Varsity Drive « Ann Arbor. MI 48104 « (313) 973-6266 







* Trademark of Commodore 














VORKIO- 


CASSETTES 
pee 


-) COMPUTER GRADE 
DATA TRAC 


BLANK CASSETTES 


C-05, C-06, C-10, C-12, C-20, C-24, C-32 


From the leading supplier of Computer Cassettes, 
new, longer length C-12's (6 minutes per side) provide 
the extra few feet needed for some 16K programs. 


OS BASF-LHD (DPS) world standard tape. 
Premium 5 screw shell with leader. 


Internationally acclaimed. 
QP Error Free e Money back guarantee. 























Thousands of repeat users. 









500 0-12's or 0-10's — 38 each 
FS (wilabels, add 4¢ © Shipping $17. /500 
500 Boxes 13¢ ea. ¢ Shipping $10. /500 

(Free Caddy offer does not apply) 


‘TRACTOR FEED « DIE-CUT 

BLANK CASSETTE LABELS 

WHITE; $3.00/100 $20,00/1000 
WwW COLORED LABELS » Pastels 


CASSETTE STORAGE CADDY 
Holds 12 cassettes, 

wio boxes $2:85) 
Includes edge labels 

and index card 


FREE 
1 CADDY WITH EVERY 
4002. CASSETTES PURCHASED 


(does not apply to $00 quantity otter) 


213/700-0330 !or MEDIATE SHIPMENT 


‘on Credit Card Orders. 
ru 9525 Vi Ave. #G 
to YORK 10 Chatsworth, ca st311 


Each cassette 
includes two YORK 10 
labels only, Boxes are 
Sold separately. We 
preter to ship by UPS 
as being the fastest and 
safest. you need ship- 
ment by Parcel Post 
check here 


NOTE: Additional 
charges outside 48 
Continental States 
Shipments to AK, Hi 





Red, Blue, Green, Yellow, Lavender 
$4,00/100 $30,00/1000 


[= call: 


ORDER 
NOW.. 

























and USA possessions 
go by Prionty Mail 
Canada & Mexico— 
Anema 

All others— Sea Mail 














Ask about our 





DUPLICATING 
SERVICE 


CHECK OR MO Charge to 
ENCLOSED ©) Creat Card: VISA [] MASTERCARD [ 


1 PLEASE SEND QUANTITY DISCOUNTS 





Card No. _____ Exp. = 


Name _____ 


Bs EEE 


City State/Zip 


Phone — 


Disk? (y/n) 
== 


Signature ee 
Computer make & model 
Os oe oe oe 
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Talking To A Disk 


Because several people have asked for information 
on disk communication, we'll interrupt our con- 
struction of an all machine language game and 
create a useful utility program this month. It will 
illustrate how to get information directly from a 
disk to a machine language program. 

After you've had a disk drive for a few 
months, some of your disks are bound to get 
crowded. You'll have backup disks, old disks 
you've retired for one reason or another, and disks 
you haven't used for a while. Housekeeping is 
called for. 

From time to time you'll want to go through 
your entire disk collection, eliminating duplicated 
programs (unless they're deliberate backups) and 
scratching unwanted, revised, or unfinished pro- 
grams. This cleans up your collection and makes 
it less likely that you'll need to waste time later 
when looking for a particular program. You put 
all your utility programs on one disk, all the games 
on another, and generally organize things. What's 
left after this housekeeping is the best version of 
everything, logically arranged. 


A Disturbance In Light 


But this cleanup can be a tedious process if you 
have to LOAD and LIST each program ina large 
collection. Tedious and treacherous: You might 
get so distracted that you scratch something valu- 
able. The “Slit” program we'll write this month 
can make this job easier. It will quickly show a 
partial listing of programs from a disk, but, unlike 
an ordinary list, the program won't be loading. 
No memory is affected. The program doesn’t enter 
the computer except to slide across the screen 
and then evaporate as the photons scatter off the 
top of the TV. It’s information in its purest form— 
just a disturbance in light. 

To keep the ML simple, no BASIC keywords 
will be listed on screen, but programs are easily 
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identified from REM statements, internal text, 
and the like. 

Program 1 is a disassembly of the 64 version. 
The VIC version is identical except that the pro- 
gram resides in the VIC from address 12288 (in- 
stead of 49152) on up. Let's look at it step by step. 

First we load the X register with the number 
1 to signify the file number. Then JSR (Jump to 
SubRoutine) within the computer’s ROM memory 
at address 65478 which performs all the steps 
necessary to prepare a file to be read by the 
computer. 

Next, we throw away the first six bytes in the 
file. We don’t want them. This could be called a 
“suction” routine because, like a vacuum cleaner, 
it pulls bytes out and then discards them. The 
first two bytes it gets from the disk point to the 
disk location of the next data block in the opened 
file. The disk drive needs this information, but we 
don’t. Moving from block to block will be handled 
automatically for us by the intelligence within the 
drive. The next two bytes are a pointer to the next 
line number in a BASIC program on disk. The 
following two bytes are the current line number. 
We're not going to be listing line numbers—that 
would make the program more complicated—so 
we can ignore all of this information. 

We step down through six DEX instructions, 
JSRing each time to 65487, the routine which 
fetches a byte. It’s essentially the same thing as 
GET#. Each time we JSR to 65487, the accumulator 
register holds the value of the next byte on the 
disk. But we just ignore each byte and fetch the 
next one. 

At address 49165 we start our main loop by 
once again jumping to the get-a-byte subroutine. 
Before working with the byte in the accumulator, 
we first test for the end of a program. We load the 
number from address 144 into the Y register. ST, 
the current input-output status variable, is always 



















™ Get Supertax by Rockware Data 
and relax on April 15th. 
SECOND SUCCESSFUL YEAR! @ THOUSANDS ALREADY IN USE! 


Use SUPERTAX personal income tax programs to calculate your tax peaee now and have plenty of 
time to make year-end investment decisions to improve your position, SUPERTAX was specifically 
created for Commodore 64 users by a practicing CPA with a Master's degree in tax accounting. 
Highly acclaimed by tax pros, SUPERTAX is easy to understand and a pleasure to work with. 


+ SUPERTAX PROGRAMS are fully screen- + SUPERTAX DATA can be stored on cassette 
prompted and include a manual loaded with and diskette, 





valuable tax information and guidance. 


+ SUPERTAX instantly recalculates your entire 


return when you change any item. 


+ SUPERTAX is available on cassette and diskette. 


SUPERTAX I 

Using either screen or printer output, SUPERTAX 
generates clear and concise summaries of Page 
1/and 3 and Schedule A of FORM 1040 allowing 
you to see at a glance and to quickly comprehend 
your tax situation. This program also prints an 
OVERALL SUMMARY of the return showing 
Adjusted Gross Income, Itemized Deductions, 
Taxable Income, Regular Tax, Income Averaging 
Tax, Minimum Tax and Payment Due or Refund— 
all of which are calculated by the program. 
SUPERTAX | also calculates the moving expense 


deduction, investment credit, taxable capital gains, 


political and child care credits, medical limitations, 
and much more. Inputis fast and easy and 
changes can be made in seconds. This program 
actually makes tax planning a breeze. 


+ SUPERTAX is available at 50% off to prior 
purchasers for all subsequent year's programs. 

+ SUPERTAX is an essential addition to your per- 
sonal software library—best of all it's tax deductible. 


SUPERTAX I 

Includes the efficient SUPERTAX | program 
as well as the more detailed SUPERTAX || 
program which makes all of the SUPERTAX | 
calculations, but which also PRINTS THE 
INCOME TAX RETURN, This program prints 
page 1, page 2, Schedules A, B, W, and G 
(income averaging) of the FORM 1040 as well 
‘as FORM 3468 (investment tax credit) on 
standard government forms or on blank com- 
puter paper for use with transparencies. Any 
input item can be changed in seconds and the 
entire return is recalculated almost instantly. 


Diskette only $89 





NOTE: Printing on government forms 





















SUPERTAX I 
This package 
includes both the 
SUPERTAX | and SUPER- 
TAX II programs PLUS a 
program to calculate and print 
Schedule C of the FORM 1040, 
Also included is a stand alone 
depreciation program which calculates 
and prints your depreciation schedule 
Using both the old rules and the new ACRS 
rules, Output from the depreciation program 
is designed to serve as a supplement to IRS 


FORM 4562. Diskette only $99 


Products shipped FOB Dallas, TX 
Commodore 64 is a trademark of 








requires friction feed printer. 








Commodore Business Machines 





Cassette or Diskette $79 


TO ORDER Call Toll Free 1-800-527-4171 In Texas Call 214-739-1100 
MasterCard, VISA, Money Orders, Bank Checks and COD Orders Accepted 


(add 3% surcharge for credit card processing) (add $5.00 for COD) 







For Brochure WRITE 

Financial Services Marketing Corp. 
10525 Barrywood Drive 

Dallas, Texas 75230 









TELSTAR 64 


Sophisticated Terminal Communications Cartridge for the 64. 


“PFO* 10D OOD CP D1 D2 BELL 12:30:00 
(TELSTAR's Status Line) 


Don't settle for less than the best! 


© Upload/Download to/from disk or tape. 

* Automatic File Translation, 

© Communicates in Industry Standard ASCII 

RealTime Clock plus Alarm Clock. 

Line editing capability allows correcting and resending long command lines, 
* 9 Quick Read functions. 

© Menu-driven. 

Similar to our famous STCP Terminal package. 

* Works with Commodore Modems and supports auto-dialing 


The best feature is the price — only $49.95 (Cartridge and Manual) 


10:14:36 


Machine Language Monitor Cartridge 
for the CBM 64 


More than 20 commands allow you to access the CBM 64's Microprocessors 
Registers and Memory Contents. Commands include assemble, disassemble, 
registers, memory, transfer, compare, plus many more. 


Someday every CBM 64 owner will need a monitor such as this. 
Cartridge and Manual — $24.95 


aSTer 
[fi <2 BE > 





8K in 30 Seconds 
for your VIC 20 or CBM 64 


i1youowna VIC 20 or aCBM 64 andhave been concermed 
about the high cost of a disk o store your programs on 
worry yourset no longer Now there's the RABBI. The RABBIT 
comesina cartridge and ata much, much lower price 
than he average disk. And speed. inisis one fas RABBIT 
\Witn he RABBIT you can load and slore on yout CBM 
dataset on 6K program in olmos 30 seconds compared 
{othe curtent minutes of a VIC 200 CBM 64, almost as 
{ost as ne #54 aisk drive 

The RABBIT is easy 10 instal, allows one fo Append 

Basic Progroms. works with oF without Expansion 
Memory. and provides two data'fle modes. The 

RABBIT snot only fas! but reliable. 

{The RobbItfo the VIC 20 contains an expansion con, 
‘Neelot $0 you con simullaneously use your memory board, ete 


NOW 
THE BEST 
FOR LESS! 


For CBM 64, PET, APPLE, and ATARI 
Now, you can have the same professionally designed Macro: 
Assembler /Editor as used on Space Shuttle projects 
1 Designed to improve Ptogronmer Productivity 
mnigysyax ond commands - No need io 'leam peculiar 
ames ord conmands when you go tom Feo REO 
A 
© Coresicent Assemblet/Eitor -Noneedioloodtne tt hen 
the Assembiet en Ih Eater eke 
@ Aso includes Word Processor, Relocating Loader, and much 
moe 
«© Fowertu Edit: Macros, Conditional and nieoctive 
Assembly, and Auto - tro page addressing 
Stiinol conviced send fot out ee spec sheet 


3239 Linda Dr. 
Winston-Salem, N.C. 27106 
(919) 924-2889 (919) 748-8446 
Send for free catalog! 
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being updated in address 144. If it isn’t zero (BNE, 
Branch Not Equal to zero), the program is forced 
down to 49200 which JSR’s to the routine in BASIC 
that stops communication. And we then RTS back 
to BASIC. A reading error or an end-of-program 
signal from the disk will flip ST out of its zero 
state, 

If we don’t get sent down to this RTS back to 
BASIC, however, we've found a byte that’s part 
of the program or file we want to see on screen. 


An Undisturbed Accumulator 


Up in line 49165, we handed a byte to the ac- 
cumulator from the disk. It’s still in there. Nothing 
we've done has disturbed the accumulator. In 
line 49172, we CoMPare the accumulator to 0. 
Since each BASIC line ends with a true 0 (the 
number zero is stored as a 48 in memory and on 
disk), we can signify this end-of-line on the screen 
by printing a carriage return when a zero comes 
in from the disk. 

If it is a 0, we BEQ (Branch if EQual) to the 
little subroutine at 49190 which does two things. 
First, it prints a 13 to the screen, which has the 
effect of causing the cursor to move down one 
line (carriage return). The BASIC routine at 65490 
will put whatever is in the accumulator on the 
screen, even nonprinting characters like 13. Sec- 
ond, we load the X register with 3 and jump up to 
the suction routine to get rid of the two-byte line 
link and the two-byte line number. 

It’s a two-edged sword that the BASIC PRINT 
routine will send whatever it gets to the screen. 
There are some nonprinting characters (delete, 
cursor movements, colors, uppercase shift) that 
would play havoc with our listing. To eliminate 
them, we've got to perform two more compares— 
throwing out any character coming in from the 
disk which is below 32 or above 128. Lines 49176— 
49182 do just that. If below 32, BCC (Branch Carry 
Clear) up to the fetch-the-next-byte routine at 
49165. Likewise, BCS (Branch Carry Set), if above 
128. BCC takes effect if something is less than 
something else. BCS takes effect if something is 
more than something else. 

Finally, if the byte in the accumulator passes 
all these tests, we come to line 49184 which JSR’s 
to BASIC’s PRINT subroutine in ROM memory. 
Then we JMP (JuMP) back up to the fetch-a-byte 
routine and look for the next character. 

You can either enter this machine language 
program into your assembler or use one of the 
BASIC loaders, Programs 2 and 3, to POKE it in 
for you. Don’t forget, VIC owners will need at 
least 8K of expansion memory and will need to 
POKE 56,48 to keep the machine language routine 
safe up in high RAM. 

To use Slist, first OPEN a file on the disk from 
BASIC: 
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OPEN 1,8,3,“NAME” 


And then SYS 49152 (64) or SYS 12288 (VIC). 
You'll see whatever program you gave as NAME 
come rapidly slisting down your screen. To see 
another, just replace NAME and SYS again. 


Program 1: vic And 64 Slist 


49152 Lpx #1 
49154 JSR 65478 


Remove Disk Data 


49157 Lpx # 6 

49159 JSR 65487 

49162 DEX 

49163 BNE 49159 
Main Loop 

49165 JSR 65487 
49168 LDY 144 

49176 BNE 49289 
49172 CMP #8 

49174 BEO 49196 
49176 CMP # 32 

49178 RCC 49165 
49186 CMP #128 
49182 BCS 49165 
49184 JSR 65490 
49187 JMP ---> 49165 
Remove Line # And Link 
49199 LDA #13 

49192 JSR 65490 

49195 LDX #3 

49197 JMP -_> 49159 
Close Channels 

49206 JSR 65484 
49263 RTS 


See program listings on page 142. @ 





INCOME TAX BY SOFTAX 
DO YOUR 1983 INCOME TAX RETURN ON THE 


COMMODORE 64 


PREPARE YOUR OWN RETURN QUICKLY AND EASILY. 00 RETURNS: 
FOR OTHERS FOR CASH! COMPARE INVESTMENT STRATEGIES, 


peoterere DISKETTE ONLY: $69.50° BRINE 


You GET: Form 1040, Schedules A, 8, Form 
2441, Menu Driven. Print Fil apability, 
Form 1040 with the 1984 Tay t 
shelter may be worth on next year’s return) 

DISCOUNT: Coupon included for a discount on the 1984 version of 
Softax 

For $5.00 more ($74.50)* you also get the Minnesota 
Individual Income Tax Return, (A bargain for the toughest 
return in the land.) 


SOFTAX, INC. P.O. BOX 332 ST. PAUL, MN 55102 
(612) 224-7477 


*Plus $1.50 POSTAGE, MINNESOTA 
RESIDENTS, ADO 6% SALES TAX 








Bonus: 


OPTION 


COMMODORE 64 is a Trademark 
of Commodore Electronics, LTD 


UNS 


The Professional Systems People And 


[MILI J(C][R][o} [wi }(RILx) 


Present Products From 
4 commodore 
n 


The Software That Makes Them Work! 


These are sample unit prices. We carry 
support items, cables, games... WE HAVE IT! 


Le [CEM PRODUCTS 
VIC 20, C-64, 8032, 8096 & B-Series CBM PRODUCTS 






















PERSONAL FINANCIAL SYSTEM 8032 Computer $ 619.00 
A complete financial package for home 8050 Disk Drive 979.00 
and small business, beginning at $69.00 8250 Disk Drive 1279.00 
on tape. 9060 Hard Disk 1979.00 











8023 Printer 529.00 


6400 Printer 1399.00 


C-64 Computer $219.00 







SpSys 

8032, 8096 & B-Series 

THE SMALL BUSINESS SYSTEM 
Available for 8050, 8250 and hard disk 
drives. GL, AP, AR, INV. and payroll 



















modules beginning at $299.00! Call for 1541 Disk Drive 249.00 
specific pricing. 1702 Monitor 249.00 

1526 Printer 339.00 
VERTICAL PACKAGES: 1600 Modem 69.00 






80 Col. Card 59.00 
MSD Dual & Single Drives CALL 









LEGISYS 

8032, 8096 & B-Series. 

The total legal office information, 
accounting and tickler system. 


LoApDSys 













Send $1 for catalog, refundable on first order. 


Call Toll-Free by dialing: 
Outside Texas: 







8032, 8096 & B-Series. 

The total truck brokerage accounting Inside ,27800-221-WORX 

system. Call for free intro consulting. ‘ 
1-800-692-4265, 










CUSTOM PROGRAMMING 
& REPAIR SERVICE 
Call for rates. 


wait for beep, then dial 008-3378, 
wait for tone and dial 993, 

or Lubbock 806/797-2623, 
Dallas/Ft. Worth 817/589-2622. 


VISA & MasterCard. Add 3% Surcharge. [MILI [C)IRI[0) [W)[0][RI[X] 


Prices for mail order only, subject to change without notice. 4210 D 50th St. Lubbock, TX 79413 
















Numeric Keypad 


Charles Kluepfel 


Turn your keyboard into a “Numeric 
Keypad” for more efficient numeric input. 
The program lets you toggle to standard 


keyboard or numeric keypad. Written for the 


64, we've added a version for the VIC. 


You could type in numbers much faster and with 


fewer errors if the VIC-20 and Commodore 64 
had a numeric keypad. This program offers this 


handy feature by redefining a set of keys to repre- 


sent numbers instead of letters. 





VIC Notes On Numeric Keypad 


The VIC version of “Numeric Keypad” oper- 
ates the same way as the 64 version, but uses 
an entirely different technique. 

Program 2 is a BASIC loader which 
POKEs machine language to the top of BASIC 
and then executes a SYS to start the interrupt. 
There is one major operating difference from 
the 64 version: Instead of using CTRL-N to 
start, it uses CTRL~. 

The 64 version POKEs BASIC and the 
Kernal ROM into RAM and then modifies 
the Kernal. This luxury isn’t available on the 
VIC, but there is a way around it. The 
hardware interrupt can be used to change 
the characters stored in the keyboard buffer 
to different values. 

To use this program with another, first 
LOAD and RUN. Since it resets the top of 
BASIC pointers, be sure your program 
doesn’t reset them. If it does, Numeric 
Keypad will not function correctly. 


Technical Modifications 


The more technically inclined might be inter- 
ested in a few tricks used in the VIC version. 
The program uses the interrupt by pulling 
the A, X, and Y registers from the stack, 





Kevin Martin, Editorial Programmer 


storing them in memory, and pushing them 
back. 

Then, it pushes the high and low bytes 
of the new return from the interrupt address, 
the processor status byte, and the A, X, and 
Y registers to the stack. It then jumps to the 
normal interrupt routine. We push those 
bytes so that after it executes the RTI in the 
interrupt routine it will return to the interrupt 
instead of the main routine. 

It then loads the keypress value in 197 to 
determine if the back arrow is being pressed. 
If itis, bit 2 of address 653 is checked to see if 
the CTRL key is being pressed. If itis, we 
jump to the routine to see if there is a value 
for any of the U, I, O, J, K, L, or M keys in 
the keyboard queue. If there is a value for 
any of these, they are changed to either a 4, 
5, 6, 1, 2, 3, or 0, respectively. We then jump 
to the ending routine. 

If either the back arrow or the CTRL key 
is not pressed, we jump to a routine to deter- 
mine if the flag at 251/is set. If that flag is set, 
we go to the routine to change the characters 
in the keyboard queue. If the flag is not set, 
we jump to the ending routine, which pulls 
the A, X, and Y registers off the stack and 
executes an RTI to get back into the program. 
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COMMODORE OWNERS... 


there is no need to spend thousands 
of dollars for a new business computer! 


Nor is there need to go through the hassle and 
expense of learning a complicated new system. 


An easy expansion will convert your Commodore" into a powerful business computer that will 
have you running productive business programs as quickly as 1, 2... plug it in and grow! 


Begin with the reliable new MSD" Super Disk ... the only disk drive readily available for 
Commodore computers. Gain instantaneous random access to programs and information, and 
save valuable time in executing your programs. 


Next ... interface the new, state-of-the-art dot matrix printer ... the Panasonic® KX-P1060 for 
hard copy that will support and document your task. 


Add expansion modules for greater power and up to 64K memory. Our terminal emulators allow 
you to communicate with other computers, such as the SOURCE, DOW JONES or COMPUSERVE. 


Complete the expansion process with software applications to address accounting, word 
processing, and other business requirements. 


Don't spend thousands of dollars on a complicated PC ... expand your Commodore and get down 
to business. The expansion is so easy you will be up and running the same day. 


Call or come by today to learn more about Your Business Software's “Expand Your Business Plan.” 


Panasonic KX-P1060 $399,00 

cae #88 SUPER DISK SPECIAL! 

VTE 40 Terminal Emulator 49.95 Single Disc Drive Dual Disk Drive 

CTE Terminal Emulator Cassette 9.95 plus the faster plus the faster 

CTE Terminal Emulator Disk 1795 

ER MESK Beas IEEE Interface IEEE Interface 
8 


EA fos $429.00 $749.00 


beet 12985 ‘TO ORDER, CALL TOLL FREE 
Accounts Receivable/Billing 69,00 800/527-5341 


Accounts Payable/Checkwriting 69.00 

General Ledger 69.00 Texas and Canada 214/526-3348 

Inventory Management 69.00 

parol hee 46300, MOST ORDERS SHIPPED SAME DAY! 
Iny 3 01 le above programs . 

Calc Result progi 439.00 FREE SURFACE FREIGHT 

Home Accounting Plus 69.00 UPS Blue Label add $3.00 

Bank Street Writer 54.00 

‘Typing Tutor 22.00 

Speed Reader II 64,00 

First Class Mail 44,00 

Oracle (data base) 139.00 

Tax Advantage 54.00 

Multi Plan 89.00 

Quick Brown Fox 64.00 


Prices are for prepaid orders only and reflect a 
cash savings; send a cashier's check or money 
order. Charge card orders are slightly higher. 
All items subject to availability and prices 
subject to change without notice. Overseas 
orders do not include shipping and handling. 


® signifies manufacturers’ trade marks 
and copyrighted products. 

















When you run “Numeric Keypad,” your 
computer will behave normally until CTRL-N is 
pressed. The cursor will disappear until you press 
another key. Then the M, J, K, L, U, I, and O keys 
will be 0, 1, 2, 3, 4, 5, and 6. By using these along 
with the numeric keys 7, 8, and 9, you have a 
numeric keypad. Pressing CTRL-N again toggles 
the keyboard back into its normal mode (again 
causing the cursor to disappear until you press 
a key). 

You can put press-apply transfer numbers on 
the affected keys to help you remember which 
number each key represents. You should use 
very small ones, so they won't interfere with the 
normal identification of the keys. (Transfer letters 
and numbers are available at art supply stores.) 


Use Numeric Keypad In A 
Program 

You also can activate and deactivate the numeric 
keypad from a program, in anticipation of numeric 
or nonnumeric input, by POKEing location 50216 
with 255 or 0 respectively. The user can always 
override this with CTRL-N. (CTRL-N is never 
passed to the program, but serves only the toggle 
function.) Just don’t POKE any value other than 0 


or 255, as that would prevent you from toggling, 
with CTRL-N. 


Here comes the new generation of SM's 


OLDEN TOOL 


A program series for the 64, 
nly Cons = 


—SWTEXT6G4 ~~ 


The professional wo! 

like multi-color 
}— additional hardw: 
direct-ai 


T 


T 





cessor with more than 80 functions - —| 
tion, up to 120 columns/line without 
ind & replace, enhanced blockhandling, 
to SM-ADREVA-files, and all 

the other usual features. —| 











PLACE YOUR CHECK OR MONEY ORDER NOW! + 


Sacre iet 











SM SOFTWARE INC. 252 Bethlehem Pike Colmar. PA 18915 





Here comes the new generation of SM’s 


GOLDEN TOOL =: 


program series for the 64. 


E SMNADREVA 64 - 


| addross-file-system. Up to 620 4 
t access, Including 6 extra lines for 


individual text/record, Totally menu Ve ene] 
Powerful editing and back-up facilities. Moy.y S60 y 


Several hardcopy features. 
I PLACE YOUR CHECK OR MONEY ORDER NOW! + 








SM SOFTWARE INC. 252 Bethlehem Pike Colmar. PA18915, 














If you prefer that the keypad start out activated, 
change the next-to-last DATA item in line 520 from 
0 to 255. 


Redefining The Keys 

To redefine the 64 keys, we transfer the Kernal 
from ROM into RAM, change it to intercept the 
M, J, K, L, U, I, and O keys, and convert the data 
to the appropriate numbers. 

Lines 3 and 4 POKE the machine language 
into an unused area of memory from the DATA 
statements in lines 500-560. 

Lines 10 and 20 transfer the BASIC interpreter 
and the Kernal from ROM to RAM with the same 
addresses, so we can modify them. The Commodore 
64 Programmer's Reference Guide, page 261, states 
that turning off bit 1 in location 1 switches only 
the Kernal addresses to RAM; actually it affects 
both the Kernal and BASIC address ranges. 

Line 25 merely signals that the transfer is 
complete (it takes about a minute). 


The Intercept Routine 
Line 30 sets up the routine which intercepts 
keyboard characters. It is put at the end of the 
routine that pulls a character from the keyboard 
buffer. 

Finally, line 40 activates the modified Kernal 


by turning off bit 1 of location 1 (changing the Here comes the new generation of SM’s 


value in location 1 from 55 to 53). Once this is ime =| 
done, the change has been made, and pressing =| |- =| 
CTRL-N toggles between a numeric keypad and ||_ al 
the normal usage of the M, J, K, L, U, I, and O be 


keys. program series for the 64, 


A Color Memory Bonus IE sy fii 


A couple of bonuses have been included in lines 


SM64 ail 


ager gives you a new dimension ~-— 








. . This index-sequential file 
31 and 32. Line 31 changes the portion of the | “ondirect access files, Up to 40 keys, various length for each 
S — record and up to 10 files can be handled at the 
Kernal onmewey 64s that puts the background same time by this sophisticated module. How could your 
color into the color memory for screen locations = programs survive without SM-ISM? 


being cleared, Instead of putting the background 
color there, it will now put 1 (for white), so that if 
addresses 1024 to 2023 (decimal) are POKEd, a rt 
character will appear. (See “Commodore 64 Video | |~ os 
Update,” COMPUTE!'s GAZETTE, July 1983, page 44.) | |_ oe te lt 
POKEing 1000 locations as suggested there fo 
takes a few seconds—not something to do for 
every PRINT of a screen clear. I H 
x 


— PLACE YOUR CHECK OR MONEY ORDER NOW! 


Choose A Color 


In the normal mode, printed characters will be is 
light blue on a dark blue background, while 
POKEd characters will be white. Change the - 
POKE to location 58587 in line 31 to some other Ls 
number if you would like a color different from — 
white for POKEd screen characters. Of course, if 
you have an older 64 which does not clear color ra 











SM SOFTWARE INC. 252 Bethlehem Pike Colmar, PA 18915, 


Here comes the new generation of SM's "4 
memory to the background color, leave out this 


—|| patch (line 31). 
| Line 32 eliminates the printing of a question 
mark and space in an INPUT statement prompt. 


Diogramiacriastforthe 64) This makes it possible to write: 
100 INPUT “TITLE:”;TS 


sy Ns 
—— MN KIT 64 “|| and have the resulting screen look like 


}— The famous programming tool with powerful basic extentions =— 


like merge, find, renumber, dump, trace, enhanced TITLE:COMPUTE!’s GAZETTE 
[— floppy-monitor (disc-doctor) and high efficient machine-language- — 
monitor with built-in assembler, diassomblor, trace and lots In any place where you really want the ? and 
= of more helpful features-really a golden tool! —|| the space, you can put them inside the quotes. 
— PLACE YOUR CHECK OR MONEY ORDER NOW! 4 See program listings on page 143. @ 





accra FREE CATALOG! 
: 
'64 SHOPPER 


Aa sorest 
MSAIEE 
Airrexret 






= 


i \ Your complete source for C-64 and Vic software! 

Lg eee, You've never seen anything like it!! 

L3 = 1s USE READER'S SEAVICE CARD, OR WRITE DIRECTLY TO: 
ae '64 SHOPPER 


Re BOX 187, FRASER, MI. 48026 


SM SOFTWARE INC. 252 Bethlehem Pike Colmar. PA18915 
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Quick Fix 
For Color RAM 


A Fast And Easy Way 
To Avoid ‘Invisible Characters’ 
On The Commodore 64 


David Gross 


A previous article, “Commodore 64 Video Up- 
date” (July 1983), discussed an internal change 
by Commodore to the 64’s operating system. 
Late-model 64s do not automatically fill color 
memory with white, so characters POKEd di- 
rectly into screen memory merge with the back- 
ground color and are “invisible.” This article 
presents a quick, simple solution. 

Sa 


“Commodore 64 Video Update” in the premier 
issue of COMPUTE!’s GAZETTE mentions that, when 
the screen is cleared, late-model Commodore 64s 
fill color memory with the screen background 
color. This renders all characters that are POKEd 
(not PRINTed) onto the screen “invisible,” be- 
cause they are the same color as the screen. Early- 
model 64s filled color memory with a contrasting 
color (white) when the screen was cleared. 

The earlier article suggested an easy one-line 
programming solution: a FOR-NEXT loop to 
POKE the appropriate color code (such as 1 for 
white) into color memory. The line looks like this: 


FOR X=1 TO 1000: POKE 55295 +X,1: NEXT 
It works fine, but takes about ten seconds to exe- 


cute. Luckily, there is an even easier and much 
faster way. 


Let The 64 Fill Color RAM 


First, simply set the screen to the color you want 
the characters to be by POKEing the color code 
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This starfield, POKEd directly into screen memory, will 
appear on both older- and late-model 64s because of a quick-fill 
method for color memory. 


into memory address 53281. Next, print a CLR/ 
HOME character or CHR$(147). Last, reset the 
screen to the background color you want. Do not 
clear the screen a second time! Color memory will be 
set to give POKEd characters the first screen color 
that you used. That’s because whenever you 
clear the screen, the new 64s automatically fill color 
memory with the color code found at 53281. 

For example, suppose that you want to create 
arandom starfield, white on black. The answer is 
the program below. It places 100 white stars at 


CodePro-64 (c) 1983, SMA 


Overview 
0 — Using CodePro-64 
1 — CBM-64 Keyboard Review 


BASIC Tutorial 
2 — Introduction to BASIC 
3 — BASIC Commands 
4 — BASIC Statements 
5 — BASIC Functions 


Graphics & Music 
6 — Keyboard GRAPHICS 
7 — Introduction to SPRITES 
8 — SPRITE Generator 
9 — SPRITE Demonstrator 
‘A — Introduction to MUSIC 
B — MUSIC Generator 

€ — MUSIC Demonstrator 


Other Options 
K — Keyword Inquiry 


R — Run Sampl ms 
Select Choice or hit (7 tor Detault 





Nowyou can leam to code in BASIC and 
develop advanced programming skills with 
graphics, sprites and music—visually. You 
leam by interacting with CodePro-64, a new 
concept in interactive visual leaning. 

SEE PROGRAM EXECUTION 

Imagine actually seeing BASIC state- 
ments execute. CodePro-64 guides you 
through structured examples of BASIC pro- 
gram segments. You enter the requested data 
or let CodePro-64 do the typing for you. (It 
will not let you make a mistake.) 

You step through and actually see the 
execution of sample program statements by 
simply pressing the space bar, CodePro-64 
does the rest. You see statements with cor- 
responding graphics and variable value 
displays. 

EXTENSIVETUTORIAL 

CodePro-64’s extensive tutorial guides 
you through each BASIC command, pro- 
gram statement, and function. You get clear 
explanations. Where appropriate, you invoke 
BasicView to see examples execute and 
watch their flow charts and variables change. 

By seeing graphic displays of program seg- 
ment execution you learn by visual example. 
You leam faster and grasp programming 
concepts easier with CodePro-64 because 
you immediately see the results of your input. 

You control your learning. You can go 
through the tutorial sequentially, or retum to 
the main menu and select different topics, or 
use keywords to select language elements to 
study. You can page back and forth between 
screens within a topic at the touch ofa func- 
tion key, 

Once you have practiced and mastered the 
BASIC language elements you move on to 





Main Menu 


more advanced concepts. You leam about 
sprite and music programming. 

SPRITE GENERATOR 

& DEMONSTRATOR 

CodePro-64''s sprite generator lets you 
define your own sprites on the screen. You 
learn how to define sprites and what data 
values correspond to your sprite definitions. 
(You can then save your sprite data toa 
diskette file for use in your own programs.) 
You can easily experiment with different 
definitions and make changes to imme- 
diately see the effects. 

Wealso help you leam to program with 
sprites by giving you a sprite demonstrator so 
you can see the effect of changing register 
values. You can experiment by moving your 
sprite around in a screen segment, change its 
color and see the effects of your changes. You 
learn by visual examples. 

MUSIC GENERATOR 
& DEMONSTRATOR 

Our Music Generator and Music Demon- 
stratorwill provide hours of instruction and 
creative enjoyment. From the beginning of 
your instruction you can compose simple 
tunes on the screen using the generator. 
Once you've completed a composition you 
can save the tune and its associated SID 
parameters to a diskette file. Our music sam- 











OUR GUARANTEE 
We guarantee your satisfaction. You 
must be satisfied with CodePro-64 for 


the Commodore-64. Try it for 10 days 
and if for any reason you are not satisfied 
retum it to us (undamaged) fora full 
refund. No risk. 





SYSTEMS 
MANAGEMENT 
ASSOCIATES 





Anew concept 
in interactive visual 
learning. 


CodePro-64° 


ple program can be used alone or incorpo- 
rated into your own programs to read the 
saved music file and replay your songs. 

Our music demonstrator /ets you expen- 
mentwith various combinations of music 
programming parameters and hear the 
results. All you do is enter rows of SID 
parameters on the screen to create a particu- 
larsound. Then you hear each sound by 
playing the “keyboard organ’’in real time as 

hift from row to row of SID parameters. 
By seeing your input and hearing the result 
you quickly lean how to create new musical 
sounds and special sound effects. 

Whether you're a beginning programmer 
oran experienced professional, CodePro-64 
will help you improve you Commodore 64 
programming skills. We're sure because 
CodePro-64 was developed by a team of two 
professionals with over 25 years of software 
development experien 

CodePro-4 is a professional quality edu- 
cational program for the serious student of 
personal computing. Andit’s fully guaran- 
teed. Order yours today. 

HOWTO ORDER 

Order your copy of CodePro-64 today by 
mail or phone. Send only $59.95 plus $3.00 
shipping and handling to: 

SYSTEMS MANAGEMENT ASSOCIATES 
3700 Computer Drive, Dept. G-1 
Raleigh, N.C. 27609 
Available on diskette only. MasterCard /- 

VISA accepted. For faster service on credit 
card orders, call toll free 1-800 SMA-RUSH, 
(1-800-762-7874). Dealer inquiries invited. 
Commodore 64 isa trademark of Commodore Business 
Machines, Inc. 


















MAI 





random locations on a black screen. The program 
tuns in half the time it would take if each star’s 
corresponding color memory location were set 


y . 
ae can be very useful when con- yA Star IS Born. 


verting Commodore PET programs that POKE to 
the screen. Simply change the screen memory 
addresses to fit the 64. Then, before any CLR/ 
HOME is printed in the program, add a command 
to set the screen to the desired character color. 
Remember to set it back to the screen color im- 
mediately after the CLR/HOME is printed each 
time. 





Quick Fix For Color RAM si at , 
10 POKE 53281,1:REM SET SCREEN COLOR TO D | J 
ESIRED CHARACTER COLOR trem 232 64 
26 PRINT CHRS$(147):REM CLEAR SCREEN, SETT 
ING COLOR RAM TO WHITE rem 239 by Eastem House 
3@ POKE 53281,0:REM SET SCREEN TO DESIRED ACommunications Cartridge 
BACKGROUND COLOR - BLACK rrem 71 fouthalcarnedaree’. 
CARs MR TET ESE eS Upload/Download, Status Line, etc. Works with 
TARS ON THE SCREEN trem 144 p 
our Commodore 1600 or 1650 Modem. 
58 P = INT(1000*RND(1))+1024:REM SELECT R Auto-dialing, etc. when used with the new 
ANDOM SCREEN POSITION rem 69 CBM 1650 Modem 
60 POKE P,42:REN PLACE ASTERISK AT LOCATI Cartridge and Manual - $49.95 
:rem 
70 NEXT C:REM END COUNTER LOOP rrem 56 
88 GOTO 84:REM ENDLESS LOOP SO AS NOT TO 
3239 Lind 
{SPACE}DISTURB SCREEN rrem 22 Ca | Matec oTI08: 
96 REM TO END PROGRAM, PRESS RUN/STOP GME i519) 924-2805. (919) 748-8046 





eu=s 


trem 2 


“MINI JIND" 


ALL IN ONE, ONE FORALL! omy “89” 


“MJ is a winner..” “Learn MINI JINI Record Keeper in 20 minutes" Commander Magazine 
“Super duper database for VIC-20 and COMMODORE 64" Software Int'l 
Anyone who keeps records can use MINI JINI” Record Keeper”. 











<=) 


Administ 
31 


Medical persons Schools 
Organizations Store owners ice 
Parly planners $ 


ee ee ee fon) 
\ cal Plug in a cartridge for 50 to 500 records on tape or disk. i 


Print labels and reports, alphabetize, do math and statistics. 


NO EXTRA MEMORY REQUIRED 














Application Templates $14.95 each AVAILABLE IN SPANISH 
OIsacLCING HerishnaNeaiC NearéoaT RleinIND: MINI JINI” Archivo instante ~ 
; Party plan™ Coming soon: FRENCH, GERMAN and ITALIAN 




















COMMODORE 64 and VIC-20 are trademara 


JINI MICRO-SYSTEMS, Inc. 


DATABASE MANAGEMENT SYSTEM DESIGN 
BOX 274 KINGSBRIDGE STN., RIVERDALE, NY 10463 (212) 796-6200 
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NEW! 
Universal Input/Output 
Board for VIC-20/64 


+ 16 channel 8-bit A/D converter with 100 
microsecond sampling time. 

+ 1 D/A output, 

+ 16 high voltage/high current discrete out- 
puts, 
1 EROM socket 
Use multiple boards for additional channels 
up to 6 boards. 


VIC-20 uses MW-311V . 
CBM-64 uses MW-311C 


+ $205.00 
+ $225.00 


MW-302: VIC-20/64 
Parallel Printer Interface. 


Works with all centronics type parallel 
matrix & latter printers and plotters— 
Epson, C.ltoh, Okidata, Nec, Gemini 
10, TP-1 Smith Corona, and most 
others. Hardware driven; works off the 
serial port, Quality construction: Steel 
DIN connectors & shielded cables. Has 
these switch selectable options: Device 
4, 5, 6 or 7; ASCII or PET ASCII; 7-bit 
or 8-bit output; upper & lower case or 
upper only. Recommended by PRO- 
FESSIONAL SOFTWARE for WordPro 
3 Plus for the 64, and by City Software 
for PaperClip. 


$119.95 


Dealer 
inquiries invited. 


Micro World Electronix, Inc. 
3333 S. Wadsworth Blvd. #C105, 
Lakewood, CO 80227 

(303) 987-9532 or 987-2671 





Software Discounters 


of 
America 


1-800-225-SOFT 
P.O, Box 278-Wildwood, PA 15091 
In PA (412) 361-5291 
Commodore 64 Software 


‘Access 
Beach Head (Tor D)......... + +$23 
Neutral Zone (T or D). $23 


S.D. of A. 


$43 


Home Accountant (D). . 
Tax Advantage (D).. 
Designware 

Creature Creator (0). . 
Math Maze (0) 
Spellicopter (D) 

Epyx 

Jumpman (T or D) 
Pitstop (CT) 

Temple of Apshai (T or 0) 
HES 

Omnicatc (D) 

Multiplan (D) 

Infocom 

Enchanter (0) 

Infidel (0) 

Planettall (D) 

Koala 

Touch Tablet wiKoala 
Programmers Guide (0) 
Pol 

Preschool IQ Builder (D). 
Reading Comprehension (0) 
Story Builder (D) 

Soga 

Buck Rogers (CT) 

Congo Bongo (CT) 
Siorra On-Line 

BC Quest for Tires (0) 
Frogger (T or D) 
Homeword (D) 
Spinnaker 

Alphabet Zoo (CT) 
Bubble Burst (CT) 
Jukebox (CT), 

Kids on Keys (CT) 
Kindercomp (CT) 

Trains (D) 

Synapse 

Blue Max (T or D) 

Morgol (T or D) 
Pharoah's Curse (T or D) 
Shamus Case Il (T or D) 
Timoworks 

Data Manager (T or 0) 
Electronic Checkbook (T or D) 
Programming Kit 1, 2. or 3(T or D), 
Accessories 

BASF SS, 0D 

Disk Drive Cleaning Kit 
Dust Cover 64, 1530, 1541, 1525 
Wico Boss 

Sakata 13” Color wiaudio 
Wico Red Ball 

Wico Bat Handle 

Wico Trackball 





Ordering & Terms: Orders with cashier check oF 
Money order shipped immediately Personal/Co 
checks allow 3 weeks clearance, VISA/MASTERCARD, 
accepted with no additional charge. Shipping: Orders 
under $100 add $2; free shipping on orders over $100 
PA, residents add @ sales tax. Roturns: Detective mer. 
chandise will be replaced with same merchandise—no 
Credits! Returns must have authorization number (412) 
361.5291 Prices subject to change without notice 


VIC-20/C-64 


Tiny 2%/x2%4x1 in, 
300 baud 
D 


Originate/Answer ¢ Full 


Duplex ¢ Carrier detect LED 
World's lowest cost modem. High performance 
Texas Instrument single chip modem design. 
Works for both VIC-20 and Commodore 64, 
Plugs into user's port. Use with single or multi- 
line phones. Plugs into telephone base. 
300 baud. Direct connect. Originate/answer. 
Full duplex. Carrier detect LED. Crystal controlled, 
Powered by computer, Aluminum enclosure, 
Includes Basic listing of Terminal Program. 
Terminal Program available on tape, $4.95 and 
cartridge, $19.95, Specify VIC-20 or C-64. 


Save VIC-20 
Cartridge Programs 


on tape 
MFJ- moe 


$3Q95° Ss 
Adapter board 


lets you save VIC-20 cart- 

ridge programs on cassette my and run them 
using 8K RAM board, Provides cartridge backup, 
eliminates plugging and unplugging cartridges 
and turning VIC-20 on and off, 

Includes adapter board that plugs into expan- 
sion port and software to save and run cartridge 
programs on cassette tape. Requires 8K RAM 
board (not included), 


RS-232 Interface for 
VIC-20/ C64 


MFJ-1238 
$39 


Provides RS-232 
voltage conversion for < 
VIC-20/C-64 serial port, Use 
RS-232 printers, modems, speech synthesizers 
and other RS-232 peripherals. Switch reverses 
transmit/receive lines for DTE or DCE operation, 
Use as null modem, Standard 25 pin RS-232 con- 
nector. Plugs into user’s port. Powered by com- 
puter, 2%x2¥%4 inches, 


VIC-20 Capacitance Meter 
Measure 100 pf to 100 Mfd. MFJ-1258 


Includes calibration capacitor, 
software on tape and hardware 29% 
interface. 

Order from MFJ and try it. If not delighted, 
return within 30 days for refund (less shipping) 

One year unconditional guarantee. 

Order yours today. Call toll free 800-647-1800, 


Charge VISA, MC. Or mail check, money order 
Add $4.00 each for shipping and handling. 


CALL TOLL FREE ... 800-647-1800 
Call 601-323-5869 in MS, outside continental USA. 


ME ENTERPRISES 


INCORPORATED 
921 Louisville Road, Starkville, MS 39759 





Write For FREE Catalog Write For FREE Catalog 


Call your order in and 
get » FREE program 


= cotvengewnsns NIE W 
wnssan CBM 64 sortwarRE CBM 64. wassss: 


5 Great Adventures For Your CBM 64... . $29.95 
SAMURAI PAK Add $1.00 Shipping 


ON CASSETTE OR DISK NINJA 





Every Game Is Different! 


HI-RES 
FULL : ACTION 
ACTION : GRAPHICS 
GRAPHICS. 
UNPREDICTABLE 
YOU WILL AND HIDDEN 
NEVER. ! DANGERS . EXCITING 
TIRE ? ADVENTURES 
OF THE f YOU WILL YOU WILL 
HIRES » \g/ NEVER HAVE UNDERTAKE. 


ACTIONS! TO WAIT 
FOR ACTION! 


ALSO INCLUDES TEXT PROGRAMS 


ADVENTURE 
CAVES OF SILVER 


REBEL FORCE by Tom Falk 


DISK VERSION ONLY — CBM 64 


Here is the most extensive A HI-RES GRAPHIC ADVENTURE 


hi-res adventure game ever 
developed and created for the 
Commodore 64. It encom- 
passes both sides of the disk 
and includes full color hi-res 
pictures. The story begins in 
the Kingdom of Acritym. 


For numerous years the 
Kingdom of Acritym has been 
ruled by Lord Cybal. A rebel 
group has formed in an attempt 
to overthrow his majesty’s 
Acritym’s government. The 
rebellion has left the majority of 
Acritym’s people exhausted, 
famished and defenseless. De- 
spite the small size of the group, 
they have a major advantage. 
They are very well organized. 
Because of this they have de 
veloped a sturdy network of 





SHUTTLE VOYAGE 


$29.95 


Add $1.% Shipping 


guerrilla tactics that have dim- 
inished the Kings army. If the 
rebellion and the organization 
can be thwarted the rebel force 
will be eliminated. His Majesty 
is presently in hiding. YOUR 
MISSION - You have been hired 
as a mercenary of your land. 
You must locate the rebel 
meeting place. The journey will 
long and hard. Others before 
you have fought valiantly, as 
you shall, only to meet their 
death inside the walls of Acritym. 


Its all part of the most 
complex intricate and huge 
adventure ever created for the 
Commodore 64. GOOD LUCK! 
Keyboard Control. 


YOU ARE THE ONLY ONE LEFT TO HELP - PLEASE SAVE US 


COMPUTERMAT - Box 1664G « Lake Havasu City, Arizona 86403 
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NEWS 
PRODUCTS 


Interfaces, 
Light Pen, 
Keypad 








the VIC-20 and Commodore 64. 


face with graphics for both the 
VIC and 64; the Card A and Car: 
B Printer Interfaces, universal 
parallel printer interfaces for 










SOPHISTICATED SOFTWARE 
OF AMERICA™~ 
PRESENTS 


GRAFIX — ARTIST™ 
(Commodore 64” version) 


THE LATEST IN EDUCATIONAL. 
GRAPHICS SOFTWARE DESIGNED 
WITH THE CONSUMER IN MIND 





























CREATE EXTRAORDINARY 
COLOR = GRAPHICS 
USING THE: 
© Joystick Mode @ Program Mode 


© Program to Picture Utility (for your basic or 
machinetanguage programs) 












GRAFIX- ARTIST™ provides comprehensive 


© Reterence Card © Help Screens 
© Introduction Tutorial @ Demo's 


NO COMPUTER EXPERIENCE 
IS NECESSARY 
Children, parents, artists, educators uill enjoy 


the ease-of-use and options 
GRAFIX-ARTIST™ provides. 














NOW AVAILABLE - Grafix-Printer™ 
COMING SOON - Lesson-Designer™ 
Dealer and Distributor Inquiries Invited 


198 Ross Rd. 
King of Prussia, PA 19406 
(215) 265-2277 


edema of Commodore Buran Machine. Ine 


Cardco, Inc., of Wichita, Kansas, 
has introduced new products for 


Included are Printer Interface, a 
Centronics parallel printer inter- 








both computers; the Cardboard 


6 Expansion Interface and the 


Cardboard 3s Expansion Inter- 


face, both for the VIC-20; the 


Cardboard 5 Expansion Interface 
for the Commodore 64; the Car- 
dram 16 16K Memory Expander 


for the VIC-20; the Cardette 1 
Cassette Interface for both 









d 





COMMODORE 64 


Finally, Excellent Software 
At An Affordable Price! 
Compare: @ MENU DRIVE 
© USER LOVABLE 
© ADVANCED FEATURES 

DATA BASE/MAIL LIST 
Fast random access to any record. 
‘Search on any field, Machine Language 
sorts, Prints mailing labels. Large 
records. Eight fields. 

LOAN ANALYSIS SYSTEM 
Calculate a loan’s term, interest 
rate, principal or monthly payment. 
Display an amortization schedule 
‘on screen or printer. Yearend 
totals for payment to interest and 
payment to principal. Printer ver- 
sion also gives principal and in- 
terest paid to date for the life of 
the loan, 

HOME INVENTORY 
Record all your valuables. Print in- 
ventory lists on screen or printer. 
Record 700 items per disk Search 
items by Category, Manufacturer or 
Item Description. Indispensable 
in case of theft or fire. 

ALL THREE PROGRAMS FOR 
$26.95 sonny, visk onty 
SEND CHECK OR MONEY ORDER TO: 
MULTI-PAC SOFTWARE 
BOX 7342 
TULSA OK 74170 
WE PAY TAX AND POSTAGE! 





machines; the Cardkey 1 16-key 
Numeric Keypad for both com- 
puters; and the Cardriter 1 Light 
Pen for both the VIC and the 64. 
The company also has avail- 
able the Write Now! word pro- 
cessor for the VIC, the Mail Now 

























mailing list processor for the 64, 
and printer utility programs for 
both computers. 

Cardco, Inc. 

313 Mathewson 

Wichita, KS 67214 

(316) 267-6525 


64 Music 
Synthesizer 





The Alien Group has developed 
the When I'm 64 music synthe- 










SmartVoice™ 





NEW 





























































A breakthrough in voice technology for the 
Vic 20 and Commodore 64 computers. This 
unit is not just another voice synthesizer 
The quality ig fantastic and it requires no 
peeks, no pokes. no phonemes no interface 
cables. no power cords, no text editors or 
programs of any kind, and installs in just 2 
seconds, Say anything you like with simple 
print statements, such as: 

PRINT #2, “MY NAME IS SMARTVOICE” 
That is all there is to it. You can talk fast or 
slow, use 63 pitch levels, create sound 
effects, sing songs, use automatic inflection 
and monotone modes, control volume by 
program or external knob. and more, A 
detailed user manual with demonstration 
programs included. Models for other 
computers also available. 

COST: $199 Add 4% S&H on MC or VISA orders 

Ohio residents add 5% Sales Tax 


USER FRIENDLY SYSTEMS INC. 
6135 Ross Road Fairfield, Ohio 45014 
(513) 874-4550 


Vic 0 and Commexion €4 waderraks of Commodore Beetronw Ltd 
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The Banner Machine™ 

For the Commodore 64 (3 extra fonts available), 

For the VIC-20 with 24K memory (2 extra fonts 

available), * Use on any Gemini or Epson MX with 
ax or the FX and RX printers, Also Commo- 

dore 1595€ and Banana with the C64. * Menu- 

driven program operates lik 

‘Makes signs up to 13” tall b 

borders of widths up to ¥' 

from 4" to8" high. * Proportional spacing; Auto- 

matic centering; Right and left justifying. * $49.95, 

Tape or Disk (Specity computer equipment) 


For the Commodore 64: 

Space Raider An amazing arcade simulation. Your 
mission is to destroy the enemy ships, $19.95 
CTRL-64 Permits listing of C-64 programs on non: 
Commodore printers. Lists control symbols. In 
readable form, Tape or disk $24.95 

Microbroker Exciting, realistic and educational 
stock market simulation. $34,95 Tape or Disk 
Preschool Educational Programs ABC Fun and 
193 Fun have bright color and action, Each $14.95 
Formulator A scientific éalculator for repetitive 
arithmetic computations. Save formulas. Ideal for 
‘chemistry, physics, or engineering students. $39.95 
MUPOS Create a file of up to 9 basic programs 
from keyboard/tape/disk and run each program 
selectively. Combine programs. Renumber BASIC 
lines, Note pad, and more. Tape or disk $29.95, 
Grade Organizer, Teachers—store, grades for 6 
Classes, up to 40 students each, 680 grades per 
student. Print interim and finsl reports, class 
rosters, and more! Disk $39.95 


S Cardinal Software™ 


Virginia Micro Systems, 13646 Jett 
Davis Hwy., Woodbridge, VA 92191, 
Phone (703) 491-6508 

Ask for our free catalog 





NEWS&PRODUCTS 


sizer for the Commodore 64, 
which is available on disk and 
on cassette for $29.95. The pack- 
age includes a machine language 
text-to-speech program, a similar 
program that incorporates the 
“Alien’’ face whose mouth 
moves in sync with the words, a 
spelling program that uses the 
talking face, and 30 prerecorded 
songs, with menus and written 
instructions to help you write 
and save new songs. 

The Alien Group 

27 W. 23 St. 

New York, NY 10010 

(212) 741-1770 





PILOT 
Language For 
Commodore 64 





PILOT II, an advanced PILOT 
language, has been developed 
by Tamarack Software for the 
Commodore 64. 

The program includes file- 
handling capabilities, both high- 
and low-resolution turtle 
graphics, a sprite editor, and 
access to the color and sound 
capabilities of the 64 without 









worp 
PROCESSING 


A Basket Full of Software Values 
at Chick-Size Prices? 


vorsatilty 
—TOTL SPELLER 
‘with bulitin dic: 
Drootreads and 
Suggests correct spelling 
MAILING LIST AND LABEL — TOTL 
LABEL organizes mailing lists, collec- 
tion catalogs, menus, all listing and 
sorting. Merges with TOTL, TEXT. 
DATABASE MANAGEMENT — TOTL 
INFOMASTER Toatures dynamic record 
‘COMMODORE 64 ana VIC 


Quality Software Ideal for the Commodore 64” and VIC 20" 


| Word PROCESSING — TOTL TEXT produces 
documents, forms and letters with speed and 






and fiold definitions, multiple options, user do: 

fined raport formulas, Integrates with other TOTL 

programs, 

BUSINESS ACCOUNTING — TOTL.BUSINESS 
handles A/R, VP. inventory and sales re- 
ports and other record-keeping tasks. 
TIME MANAGEMENT — TOTL TIME 
MANAGER plans schedules and ana- 

ING, |yz08 ovents in numerous ways. 






‘SOFTWARE, 


1555 Third 
Walnut Creek, CAs4506 f0F dutomated indexing 
(ais)oai.7077- erence system 


A 
SS 


PUTER 


7499 


1520 Color Printer/Plotter -$169.00 
M-801 Dot Matrix/Parallel. +.$21,9.00 
1530 Datasette ...... +-.- $69.00 


IL ORDER 


4 commodore 


Sx-64 
PORTABLE 


1541 Single Disk Drive 
1600 VIC Modem.... 
1610 VIC Term 40 .. 
1650 AD/AA Modem. 
1702 14” Color Monitor. 
1311 Joystick (each).. 
1312 Paddles. 

1110 VIC 8K 

1111 VIC 16K.. 

1011 RS-232 Interface . 
1211 Super Expander .. 


commodore 
CBM 64 Reference Guide , 
C64 DISKS, 


-$18,00 


EasyCate. 
EasyFinance | ll, Ill, IV 
EasyMail 

EnsyScript.. 
Word/Name Machine .. 
EnsySpell....... 
Accounts 

Accounts Payable 
General Ledger. 
Assembler 

Logo 

Pilot 

Pot Emulator .. 

Screen Editor . 

Music Machine, 

Music Composer... 
VIC 20 CARTRIDGES & DISKS 
Gortek & the Micro Chips(C)...$19.00 
Super Slot (R) . $14.00 
Super Alien (R) ‘114,00 
Jupiter Landor (R)........0...814,00 
Radar Rat Race (R) . $14.00 
Count Adventure (R) »,$21,00 
Pinball Spectacular (R) ..--..819.00 
VIC Reference Guide 1315.00 
ARTWORX 
€-64/VIC 20 CASSETTES 
Bridge 3.0 «$15.00 
Teacher's Pets. ce..sc..j..20.,812,00 
BRODERBUND 
VIC 20 CASSETTES 


$65,00 
$19.00 


$16.00 
+$16,00 

Multisound Synthosizer......$16.00 

COMMERCIAL DATA 
VIC 20 CASSETTES 

Motor Mouse ....... 

Centipod..... 

Frogee ......... ow 

C-64 CASSETTES, 

Road Toad... os 


- $249.00 
$59.00 
$49.00 
$89.00 

-$249.00 

$4.99 

.. $11.99 
$42.00 
$69.00 
$42.00 
$53.00 


MSD 
SD-1 Disk Drive (C-64),,.$349,00 


CARDCO. 
Light Pen. 
3 Slot VIC Expans, Int, ...832,00 
6 Slot Expans. Int +$79.00 
Cassette Interface ........$29.00 
Parallel Printer interface ...$49.00 
Parallel Interface w/Graphics..$69.00 


$32.00 


SOFTWARE 


CREATIVE SOFTWARE 
C64 CASSETTES: 
Home Inventory 
Household Finance. 
C-64 CARTRIDGES 
Trashman. 


$11.00 
$23.00 


. sessseeves+$29,00 
C64 DISKS 
Home Inventory $11.00 
Household Finance..........829.00 

VIC 20 CASSETTES 
Home Inventory... 
Household Finance 

VIC 20 CARTRIDGES: 
Astro Blitz. 
Black Hole. . 
Trashman 
Chopiitter. 


+$12,00 
$14.00 


$21.00 
+$32.00 

21.00 
+$21,00 


DYNATECH 
C-64 DISK 
Codewriter. 


EPYX 
VIC 20 CASSETTES 
Ricochet.......+ 
Sword of Fargoal.... 
Rescue at Rigel .. 


$32.00 
+$24.00 
+$24,00 


QUICK BROWN FOX 
C-64/VIC 20 CARTRIDGE 
Word Processor....s.:.s.s1+ $49.00 


uM 
VIC 20 CARTRIDGES: 
“to: +,$30,00 
Meteor Run +1+$40,00 
Alion Blitz 1,830.00 
VIC 20 CASSETTES 
Cloud Burst +1:$15,00 
Video Verman +$19.00 


Amok « 


DUST COVERS 
C-64/VIC 20 Cover. 


ATARISOFT 
€-64/VIC 20 Cartridges 
Centipede i $37.99 
PacMan..... $37.99 
Donkey Kong... -$37.99 
Dig Dug... $37.99 
Defender . +$37.99 
Robotron . ++$37,99 
Stargate sesesese $37.99 
HES 


vic 20 CARTRIDGES 
Vic Forth, 


HES Mon 
HES Writer, 
Aggressor . 
Synthesound 
Shamus. 
Protector f 
Turtle Graphics............ 
4 CARTRIDGES 


392.00 
tesvees$29,00 
teers 829,00 
+$29,00 
+$21.00 
$29.00 
$29.00 
$29.00 


c 
HES Mon -$29,00 
<1 835,00 


wr 
HES Writ Hee 

VIC 20 CASSETTES, 
Alien Panic 
Race Fun:Drag Race 
The Catup ... 
Exterminator. itech 
C-64 CASSETTE 

ROMGx 
Type (20/64) td 
AINBOW 
Fee DISKS. 
Personal Finance 
Writers Assistant 
Spreadsheet Assistant...... 
QUANTUM 
40/80 Column Video Board...$95.00 
40/80 Col. Video Board (1 6K)...$179.00 
SiRiUs 

VIC 20 CARTRIDGES. 

Deadly Duck. 


$10.00 
$16.00 
$10.00 
$19.00 


3:D Man 


.$9.99, Spider City ie 
We carry a selection from the above manufacturers plus... 


PRINTERS 

EPSON... 

Okidata....... 

Star Gemini 10X 

Star Gemini Delta 10..,.$559,00 
Smith Corona TP-2...,.,$399,00 
C.ltoh Prowriter8510P ...$379.00 
C.Itoh Gorilla $209.00 


MICROSPEG 

VIC 20 CASSETTES, 
Spelling Boe: 
Grades 2. 3, 4, 5, 
Math Drill 
Portfolio Manager 
Data Manager . ’ 

VIC 20 DISKS 

General Ledger. af 
Mailing List Manager . 
Inventory Package . 
Payroll. 
Data Base. 

C64 CASSETTES, 
Black Box. 
Color Sketch .. 
Match Maker 

C-64 DISKS 

Mailing List Manager 
Inventory Package 
General Ledger: 
Payroll. 
Data Base.. 
CalcResult . 
Black Box...... 
Color Sketch 
Match Maker 


TRONIX 


Vic 20 CASSETTES 
Galactic Blitz +111 819,95, 


or. 


VICTORY 

C-64/VIC 20 CASSETTES 
Adventure Pak I(3 games) ...$12.00 
Adventure Pak II(3 games)...$12.00 
Annihilation 1816.00 
Grave Robber. +$11,00 
Kongo Kong :$16.00 
Trek $11.00 

PROFESSIONAL 

SOFTWARE 

Word Pro 64. +++ $59.01 


Synapse, Thorn, InfoCom, Onslow, Practicalc, Spinnaker & Timeworks. 


=CANAD 


{4-800-268-4559 f-800. 233- chee 1@) ee 


In Toronto call (416)828-0866, Dept. 0413 In PA call (717)327-9575. Dept. 0413 

2505 Dunwin Ct.,Unit 1B, 477 E. Third St. Williamsport, PA 17701 

ada LSLIT! Order Status #: 327;9576 
Status #: 828-0865 Customer Service Number: 327:1450 

No risk, no deposit on C.0.0. ordors. Pre-paid orders receive tree shipping within the UPS Continental United States with no waiting period for certitied 
checks or money orders. Add 3% (minimum $5.00) shipping and handling on all C.0.D. and credit card orders. Larger shipments may require additional 
charges. NV and PAresidents add sales tax. All items subject to availabilityand price change. We stock manufacturer's and third party software for mostall 
computers on the market. Call today for our new catalog. 
CANADIAN ORDERS: All prices are subject to shipping, tax and currency exchanoe fluctuations. Call for exact pricing in Canada. 


> 800. 648.5311 


In NV call (702)588-5654, Dept. 0413 
P.O. Box 6689, Stateline, NV 89449 
Order Status #: 588-5654 





VIC - 20/ COM - 64 
HOME / BUSINESS 
vic 


PRACTICALC PLUS (16K\T) 43.95 


(disk version) 
CARDCO 3 SLOT 
EXPANSION BOARD 


16K 


28.95 


MEMORY 
EXPANSION 


ONLY $4.Q95 


% 14 Day Money Back Guarantee 
%* Boosts VIC to 21K RAM 

* Top Quality, Fully Tested 

* 90 Day Warranty 


for IMMEDIATE SHIPMENT 
on Credit Card Orders 


Call: (303) 245-9012 
9 AM - 9 PM MST Every Day 
ASSEMBLY TECHNOLOGY 
2692 Hwy 50 Suite 210 
Grand Junction, CO 81503 











NEWS&PRODUCTS 


PEEKs and POKEs. 

There are 25 editing com- 
mands, 19 turtle graphics 
commands, and 23 program 
commands with subcommands 
and other options. The Program- 
mers Aid Package contains such 
editing commands as FIND, 
CHANGE, TRACE, RENUMBER, 
AUTO, SAVE, LOAD, SPRITE, 
and BLOAD (a machine lan- 
guage loader). 

Other special commands 
allow the use of joysticks, light 
pens, and paddles. PILOT Il is 
available on diskette for $49.95. 
Tamarack Software, Inc. 

P.O. Box 247 
Darby, MT 59829 
(406) 821-4596 





COMPUTE!’s GAZETTE welcomes 
announcements of new products for 
VIC-20 and Commodore 64 computers, 
especially products aimed at beginning 
to intermediate users. Please send press 
releases and photos well in advance to: 
Tony Roberts, Assistant Managing 
Editor, COMPUTE!’s GAZETTE, 
P.O. Box 5406, Greensboro, NC 27403. 





New product releases are selected from 
submissions for reasons of timelii 
available space, and general interest to 
our readers. We regret that we are unable 
to select all new product submissions for 
publication. Readers should be aware 
that we present here some edited version 
of material submitted by vendors and are 
unable to vouch for its accuracy at time of 
publication. @ 














| WIG20 Friendly 


Each connector is 
positively keyed to : 
assure correct plug-ins. 


Four slots of high 
quality connectors for 
full memory expansion 
and utility cartridges, 


Gold plated contact 
fingers for solid and 
long-lasting connection. 


hook-up provision lets 
you run the VIC 
without overheating. 


External power supply, | 


. 













‘Two-way power source 
switch for easy selection 

of power from outside 

or the VIC, 


‘Four convenient 
ON-OFF switches for 
individual control of the 
four slots, 





Reset button lets you 
restart the VIC without 
turning off the 
computer, 


Fuse block for overload 
and short protection. 





The CP VIC-20 Expander is the one you have been waiting for. It incorporates all the features you've 
ever asked for, The CP VIC-20 Expander enhances your VIC-20 computer system by fully expanding, | 
the VIC-20 memory, plugging in cartridges for programming utilities, language extension, and many, 

many more various applications for your VIC-20 at only $44.95. 


Dealer inquiries welcome. 
| 


23914 Crenshaw Blvd., Torrance, CA 90505 | 
(213)325-4754 | 


== Computer Place 


VIC-20 is a registered trademark of Commodore Business Machines. 








——__su¢h A Deal_ 


Lowest Prices — Guaranteed!* 


COMMODORE 64 


Just for You! 





ONAL FINANC! 
Continental Home Accountant (D) 
Continental Tax Advantage (D) 
Continental FCM First Class Mail $29 
CheckEase (C&D). .0.5..2.- » $24 
‘Timeworks Electronic Checkbook (D&C) $19 





47 
$33 











Timeworks Money Manager (D&C) .... $19 
Timeworks SwifTax (D) ...2.-2....+., $39 
Creative Household Finance (D) .....-» $23 
Creative Household Finance (C) - $19 
Creative Home Inventory (D) . 313 
Creative Home Inventory (C) $10 


$13 
s10 


Creative Loan Analyzer (D) 
Creative Loan Analyzer (C) 


WORD PROCESSING 








Hesware Omniwriter (D) M9 
Rainbow Writers Asst. (D) 49 
Blue Sky Seript 64 (D) $69 
Cardeo Write Now! (D)'.... $39 
Timeworks Word Writer (D) .. $39 


Toll T. Text 2.6 (D&C) 
Toll Speller 3.6 (D) . 
Muse Supertext (D) ...... 
On-Line HomeWord (D) .. 


ELECTRONIC 
SPREADSHEETS 














Hesware Multiplan (D) $75 
Hesware Omnicale (D) 37 
MSI Practicake (D&C) $35 
MSI Programmable Spreadsheet (D) ... $55 
B. SKY CALC Result Easy (D) 49 


Home Cale (D&C) $26 








B. Sky CALC Result Adved (D) ...... $75 
$33 
$13 

Creative Car Costs (C) $10 

Greative Decision Maker (D) $13 


Creative Decision Maker (C) ..... 10 
Hesware Time & Money Manager (D) $39 


Timeworks Data Manager (D&C) ...... $19 
Compuserve Starter Kit (5 hts) ........ $29 
Timeworks Data Manager Il (D&C) .... $19 


ART & MUSIC] 

Epyx Fun with Art(CT) .... 
Epyx Fun with Music (CT) 
Hesware Synthesound (CT) 
Hesware Paintbrush (CT) . 
Spinnaker Delta Drawing (CT) 
Delta Music (CT) eseceseeeeerreee 


EDUCATION: 

Spinnaker Alphabet Zoo (CT) 
Spinnaker Cosmic Life (CT) 
Spinnaker Facemaker (CT) 
Spinnaker Fraction Fever (CT) 
Spinnaker Kids on Keys (CT) 
Spinnaker Kindercomp (CT) 
Spinnaker Story Machine (CT) 
Spinnaker Up For Grabs (CT) 
‘Spinnaker Delta Drawing (CT) 
Creative | Am Your 64 1 (D) 
Cretive LAm Your 64 Il (D) Pe 
Hesware Turtle Graphics (CT). 
Hesware Type °N' Writer (CT) 
‘Cymbal HghSI Mathematics (D) . 
‘Cymbal HghS! Span‘Eng (D) 
‘Cymbal HghS! Science (D) 
Cymbal HghS! History & 

















Geography (D) both so $39 
Cymbal HahS! Music (D) + $39 
Cymbal Pre Schooler (D) .. $39 


“TERMS OF OFFER: If you find a price for any software or peripheral in this issue that is lower than our advertised price, 





COMMODORE 64 Cont'd. 
LANGUAGES & UTILITIES 


Hesware 6502 Pro Devel Sys(D)_ 

Hesware Hesmon 64 (CT) ...... 

Hesware 64 Forth (CT) ... 

Acess Spritemaster (D&C)... 

Timeworks Programmer Kits I 1, lil 
(D&C) 

Blue Sky Last One (D) 

Blue Sky 80 Column (D) 

Blue Sky Graphic Designer (D) 

Blue Sky 64 Statistics (D) 

Blue Sky Super Basic (D) 

Bie Sky Add On Basic (D) 

Blue Sky Super Copy (D) 


BUSINESS SOFTWARE 
Total Business 3.6 (D) 
Total Time Mgmt. (D) 

Total Lable Mail (D) 

Total Research Asst, (D&C). 
‘Cymbal General Ledger (D) 
‘Cymbal Acct. Receivable (D) 
‘Cymbal Acct, Payable (D) 
Cymbal Inventory Cont 

Cymbal Invoice Writer (D) 
MSI Practifile (D) ... 


GAMI 

Epyx Dragon Riders of Pern (D&C) 
Epyx Silicon Warrier (CT) 
Sega Congo Bongo (CT) 
Sublogsc Pinball (D&C) 
Hesware Maze Master (CT) 
Broderbund Chopltter (CT) 
Epyx Pitstop (CT) 
‘SubLogic Flight Simulator 
Sega Star Trek (CT) 

Sega Buck Rogers (CT) . 
‘Acess Beach Head (D&C) 


COMMODORE VIC 20 
[PERSONAL PRODUCTIVITY | 








2. $19 
+ $26 
M5 


each $19 
$79 


fe gegees 


2 





eeeee geeeeee 





(0) 


$27 


Creative Home Office (D) $22 
Creative Home Office (C) $19 
Creative Household Finance (D) $17 
Creative Household Finance (C) $13 
Creative Home Inventory (D) $13 
Creative Home Inventory (C) $10 
MSIL. Practicale Plus (D) 335 
MSIL Practicale Plus (T) 283 
MSI. Practicale (D) saz 
MSIL. Procticale (T) $29 
Hesware Vie Fourth (CT) 39 
Hesware Hes Mon (CT) $26 
Cardco Write Now... $27 
Hesware 6502 Pro Dev Sys $19 
Epyx Fun with Art (CT) $26 
Epyx Fun with Music (CT) -$26 
Broderbund Mastertype (CT) $24 


EDUCATIONAL SOFTWARE 


Hesuare Spinnaker 





KinderComp (CT) $23 
Story Machine (CT) $23 
Face Maker (CT) $23 
Kids On Keys (CT) $23 
‘Alphabet Zoo (CT) $23 
Hesware Turtle Graphics (CT) $26 
Creative Pipes (C) si9 
Creative Spills & Fils (C) si9 
Creative Hangman & Hangmath (C) ... $10 
GAMES 

Creative Chopliter (CT) $19 
Epyx Temple of Apshai (C) $24 
‘Sega Congo Bongo (CT) $25 
‘Sega Star Trek (CT) + $25 


similar in-stock conditions. Valid only on prices appearing in print in this issue. 


ORDERING & TERMS: Send cashier check, money 


Rock Bottom 
Prices on 
Peripherals! 
ww boneyea 
Hescard Vic 5 Slot $39 
HesModem Vic & C64 S47 

GRAPHICS TABLET 

CALRODARD POWERED soos 879 
lesan 

ee, 

Logic Master $27 

Leo's Links $27 

Programmers Kit $19 

BearJam $25 

KOALAPAD ATARI C64 $67 

PRINTERS 

ISTAR MICRONICS, 

FEE beare tel 

STX-80 Thermal 60CPS. $177 

GEMINI 10X Dot 120CPS $287 

GEMINI 15X Dot 120CPS $497 


DELTA 10X Dot 160CPS. 
DELTA 15X Dot 160CPS, 
POWER T DAISY 18CPS. 
RADIX 10 Dot 200/50CPS 
RADIX 15 Dot 200/S0CPS. 


IBMC PRINTERS 











BMC BX80 
BMC DAISY 101 

BMC DAISY 401 

MODEMS 

INOVATION 

Smart Cat 103212 1200 boud . 

212 Auto Cat 

Dca 

ICat 

|ANCHOR MODEMS! 

(with power & cable) 

Mark 7 300 baud $129 
Mark. 12 300-1200 baud $319 
Volksmodem 300 baud $79 
MONITORS 

‘Amdek Color 1 $287 
BMC 13° Composite Color $229 
BMC 12° Low Res Gr $85 
BMC 12° Low Res An $99 
BMC 12° Hi Res Gr $119 
BMC 12° Hi Res Amber $129 












1 12° Green Hi Hi Res $129 

1 12° Amber Hi Hi Res $139 

+ Composite Color $279 
Monitor cable w above 310 


COMMODORE DISK DRIVES 






Concord Disk Drve $279 
Commodore 1541 $269 
WICO JOYSTICKS| 
The Boss sis 
3 Way Grip Stick S21 
ICARDCO 
Numeric Keypad C64 $29 
$69 
i Imerlace $39 
Commodore 645 Siot $19 
16K Board $53 
Cassette Inter $27 








BLANK DISKETTES 


MD1SSDD ... 
Mb2 DS DD 


$27 
+ $40 
































Home Software for the Commodore 64 
The Standard for Sophisticated 
ftware in the '80's, 





Pinball Construction Set (D) $40 
MULE, (D) $40 
Worms? (D) j + $35 
Archon (D) 





Hord Hat Mack (D) .2.2...005 
Murder on the Zinderneut (0) 
The Tesseract Strategy (D) 





Word Fiver (D) federee $35 
The Cut & Paste Word Processor (D).. $50 
D Bug (D) oF $35 
Axis Assassin (D) $35 
Music Consituetion Set (D) $40 
Financial Cookbook (D) $50 
Dr. J. & Lorry Bird One on One (D) .. $40 


FREE DISKETTE 
with each purchase of electronic] 
arts software 





—}uth A Deal_ 


CALL TOLL FREE 
1-800-431-8697 
602-968-9128 
Orders Only! 


12629 N. Tatum Blvd., #138 
Phoenix, AZ 85032 


For Information, Customer 
Service, Release Dates, etc. 


Call 
602-955-3857 


(C)= Tape (D) = Disk (CT) = Cartridge 


we'll guarantee to beat it! Valid only on product in 


‘order; personal/company checks allow 3 weeks bank clearance. VISA/MasterCard accepted. Provide phone number 


with order. SHIPPING: Software add $4.00 for first piece, add $1.00 each additional piece. Hardware add 3% or $10.00 whichever is greater. Returns must have authoriza 


tion number (call 602-955-3857 for authorization number). All returned merchandise subject to restockin: 
allowed after 30 days from shipping date. Prices are for cash; VISA and MasterCard add 3%. Prices subjec 


manufacturers and/or suppliers. Alll prices in U.S. dollars. We sell mail order only. C.O.D. orders accepted 


1g fee and must come with all original packaging. No returns 
t to change without notice. All products subject toavailability from 


Eee a es 
Bug-Swatier: 


Modifications And Corrections 


e “Budget Planner’ (December 1983) uses a 
Commodore Datassette to store data. The fol- 
lowing modifications will allow you to use the 
program with a disk drive: 
450 OPEN 1,8,6,F$ 


4650 OPEN 1,8,1,"@Q0:"+F$ 
7120 OPEN 1,8,0,F$ 


@ The Commodore 64 version of ‘“Tetracrys- 
tals” (January) contains a slight error on line 13 
To correct it, insert RN between G and BLU. C7$ 
should be 


“BLKWHTREDCYNPURGRNBLUYEL” 





© The printer used to generate program 
ings has burped another pesky question mark. 
ne 120 of the VIC version of MLX (January and 
February) is the latest victim. Correct it by re- 
moving the ? between RIGHT and OFF. 


© Readers who typed in the 64 version of 
“Canyon Cruiser” (January) may have encountered 
an ?ILLEGAL QUANTITY ERROR in line 1420 
because it is not possible to POKE a number higher 
than 255 into a memory location. Change line 
1420 to 


POKE53287, (PEEK(53287) + 1)AND255 






@ “SpeedScript’’ (January) works as listed, 
but there are some inconsistencies in the accom- 
panying article. The cursor keys were incorrectly 
labeled on Figure 1: Keyboard Map, page 48. CRSR 
Left and CRSR Right will move the cursor left and 
right. CRSR Up moves to the previous sentence; 
CRSR Down moves to the next sentence. Table 1 
page 52, is missing CTRL-= which returns the 
amount of free memory. Table 2 is missing the 
command for line spacing. SpeedScript defaults 
to double-spacing; if you want single-spaced docu- 
ments, use CTRL-(English Pound)-S, followed by 
the number one (1). 

Some readers, in trying to enter SpeedScript, 
discovered an 7?UNDEF’D STATEMENT error in 
line 550 of MLX. If you don’t use the POKEs listed 
on page 39, MLX and SpeedScript will both try to 
use the same area of memory. The POKEs fence 
off a section of BASIC for use by SpeedScript. It is 
necessary to follow the directions on page 39 be- 
fore you LOAD MLX. 

Also, next month look for “‘SpeedScript Re- 
visited’ in which Charles Brannon will answer a 
variety of questions from readers. @ 
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Free Program 


SUNSOFT's™ 1541 Disk Backup program copies almost any 
disk. It's FREE when you buy any disk program trom our free 
Catalog, now teaturing Disk Doctor v3.0, a collection of pro: 
grammers’ aids to help you do such things as autorun, un: 
scratch, qutonumber, re number, append, merge and screen 
dump. Also enables you to convert blocks of memory into DATA. 
statements, and helps you with binary and hex math/conver- 
sions. MUCH, MUCH MORE! Disk Doctor v3.0. for 64 only, disk 
only—$2495. Send a posicard oF letter for tree descriptive 
brochure and catalog, 


m2, SUNSORE 


33820 


FL Res, add| 
5% sales tax’ 


woes C=64 AND VIC-20 


TERMINAL SOFTWARE 
VERSATERM IL” 


UPLOAD, DOWNLOAD, TRANSFER 
FILES TO/FROM DISK, DUMP TO 
PRINTER, CONVERT IMAGE FILES 
AND BASIC LISTINGS INTO RUN~ 
JOGRAMS, AUTODIAL AND 
OGRAMMABLE 
KEYS, 46K BUFFER, SELECTABLE 


COLORS. $34.95 ON DISK 
VERSATERM I” 


TERMINAL SOFTWARE FOR THE 


2495 “£3995 


TAPE CARTRIDGE 1690 wre « 


ELECTROSHARP TECHNOLOGIES. 


|ANDALWOOD I cA 93455 


EPROM PROGRAMMER 
FULLY BUFFERED, BUILT IN POWER 
SUPPLIES, READS, PROGRAMS, 
FIES, CHECKS ERASURE, TRANS! 

FOR ALL POPULAR EPROM TYPES 
SPANNING 1K 10 16K BYTES. $114 90 


with cose 


i095 








BE A COPY C.A.D. (CASSETTE AIDED DUPLICATOR) NOW 
YOU CAN MAKE BACKUP COPIES OF ALL THE COSTLY, 
NON-SAVEABLE CASSETTE PROGRAMS YOU BOUGHT. 


OUR BACKUP V1.0 UTILITY PROGRAM WILL LET YOU 
MAKE DUPLICATES THAT RUN. 

BACKUP V1.0 WILL WORK WITH A STANDARD 5K 
UNEXPANDED VIC, MEMORY EXPANSION IS REQUIRED 
TO COPY PROGRAMS LONGER THAN 3K BYTES. 


$24.95 FTW. 
PLUS $2.00 So! WARE PLUS 


SHIPPING & GREENBACK LANE 
HANDLING CITRUS HEIGHTS, CA 95610 
VISA, MASTERCARD, AND MONEY ORDERS 
CA RESIDENTS ADD 6% SALES TAX 
VIC IS A TRADEMARK OF COMMODORE 











C-64 SOFTWARE 
POWER PLUS 


A utility program that adds over 40 
commands to your C-64. Doesn't useany 
BASIC memory. 100% machine language. 
FEATURES: 
© Un-new—get back BASIC programs 
after reset 
* Screen Dump—to printer 
* Easy, abbreviated Disk Commands 
* Machine Language Monitor with 
* Assembier/Disassemblor 
© Transfer, Fill, Hunt, etc 
© Adds BASIC commands 
© Find = Change 
* Renumber —« Delete 
* Auto line numbers, 
* Excellent manual 
$19.99 
Indicate tape or disk, Send check or mo. 


(include $2.00 p/h) to: Educomp. 
2190 Newcastle Ave, Caritl,CA ‘32007 


(619) 942. 
SATISFACTION GUARANTEED. 





AT LOW PRICES 
QUICKWRITER II 


A full-featured word processor at a 
fraction of the cost, More powerful than 
all w/p under $50.00. Has features even 
$100.00 w/p don't have. 
FEATURES 
* 100% machine code, the fastest w/p 
we've seen 
Works with all printers/intertaces 
Semi-automatic hyphenation 
Justification 
Form letters automatically 
Block Transfer, Delete, insert. 
Appena, 
‘Auto page numbers, headers and 
footers 
Send disk commands’ 
PRE-VIEW—see left or right side of 
page before printing 
Full-screen editing with rapid scroll 
Easily send special printer commands 
Excellent manual 


$29.99 





Make Your Commodore Radio Factive 





The MICROLOG AIR-1 cartridge will turn your VIC-20 or 
C-64 into a complete Radio Teletype and Morse code ter- 
minal, Connect a shortwave radio and you'll be watching 
text readout from weather stations, news services, ships and 
HAM radio operators all over the world. A whole new use for 
your home computer. The AIR-1 contains both program in 
ROM and radio interface circuit to copy Morse code and all 
speeds and shifts of radio teletype. Plus the on screen tuning 
indicators mean you never have to take your eyes off the 
video for perfect tuning. 

For Ham radio use, the Air-1 will also send and receive 
RTTY/CW with AFSK/PTT & +CW ing outputs. 

The AIR-1 will even tell you what Morse speed you're 
copying and provide built-in send/receive code practice! 














With keyword or manual printer control for permanent 
paper copy, you won't miss a single bit of the action. 

If you've been looking for something to spice-up your 
computing, try the ultimate “peripheral” and connect your 
computer to the AIR-1. 

The complete AIR-1 for the VIC-20 or “64” is $199. 
(With 4 mode AMTOR, $279.) See it at your local dealer or 
call Microlog Corporation, 18713 Mooney Drive, Gaithers- 
burg, Maryland 20879. 

TEL: (301) 258-8400. Telex: 908153. 


MICROLOG 


INNOVATORS IN DIGITAL COMMUNICATION 

















COLOR PROBLEMS? 
One of Our Four New 
Products will Solve Them! 


You're not alone. Thousands of Com- 
modore 64 owners have “fuzzy” color on 
their TV. Most have interference lines 
crowding out their great graphics. Many 
have bought expensive monitors or new 
TVs, and often even that hasn't helped. 
But, most of us just lived with the problem. 
Now the engineers at Bytes & Pieces 
have four simple. inexpensive solutions. 


It you have an “old 64” (with the 5 pin 

Monitor Din Plug). you've probably had 

color, resolution and interference 

problems. We can solve them! 

] The Interference Stopper... A new 
kit that installs in minutes with two 


simple solder connections. Best 
results when combined with #2, 3, 
or 4 below. Absolutely stops 90% of 


the RF interference on your screen. 


$15.95 


The Color Sharpener. . Use if your 
“old 64” is hooked up to a TV. Just 

plug into the monitor plug, and the 
color and contrast immediately im- 



















The Monitor “Improver”.. If you 
have a Commodore 170! monitor, 
this cable (3 prong) gives you a pic- 
ture you won't believe. Better than 
the cable Commodore built... .by 

a lot. Try it, you won't be disap- 
pointed. (Also hooks your “Old 64” 


to the 1702) $24.95 


The Reset Switch. . .Here it is. a 
5 Reset Switch for Vic or Commodore. 


Get back into control of a "Hung-Up* 
bay Resets all pointers. Easy 


4. 


two solder connection installation. 
Every computer should have one. 


$9.95 


If any of our products do not work to 
your satisfaction, send it back and 
we'll refund your purchase price in full. 
DUST PROBLEMS? 
Solve Them with Matching Dust 


Covers for Computer, Tape and Disk. 


$7.95—$9.95 
These are the deluxe covers for either the 
Commodore 64 or the Vic 20 made ot 
brown leather grain Naugahyde, spe- 
cially lined with a soft non-scratch liner, 
for a cover you just can't beat. 





prove. Dramatically. Crisp letters. 1 
Great graphics, $18 95 Don't waste your money on those cheap 1 MasterCard # == 
a looking, cleat plastic, static filled covers. etek 
3. The NEW Color sharpener Get the quality ones, custom fitted to your | Expiration Date 
ja Ci ae .Use if your “old eA is 2 Commodore computers. i] 
ane a Nea, Available sngly oraz a matched atin | aga 
ener Dull in. All the benetits of #2 oie al ear ats H SHIP TO, 
on your monitor, lnadannouie ot Commpodeee Cortmruat Cr Name 
$24.95 tadematss of Commodore Computer Company ED 
& Pieces, INC. iiauties S50. ein Stoo, sia 
D Invited | Wauwatosa, WI 53213 414/257-3562 9 State/Zip. 








ORDER TODAY! 
Please send me the following, 
Qty. tem Amount 
Interference 
Stopper @91595 $ 


Color Sharpener 
@S1895 s 











——— The Monitor 
improver @ 
$2495 


The Reset Switch 
@$995 





—— Computer Dust 
Cover @ $995 § 


1841 Disk Dust 
Cover @ $895 § _ 





I 
I 
| 
| 
| 
| 
| 
1 @ $2495 s 
| 
| 
| 
! 
| 
| 
| 





Dataset Dust 
Cover @ $795 § 
| Shipping & Handling § 200 
] 5% State Tax 
(Wisconsin Residents only) 
TOTAL § 
| D Check or Money Order enclosed 
] 9 Charge to my VISA or MasterCard 
VISA # _ —_—_—_—____ 



















Le 
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VIDEO INSTRUCTION TAPES! 
STEP BY STEP INSTRUCTIONS 


PICTURES ARE WORTH 
THOUSANDS OF WORDS AND SAVE 
HOURS OF FRUSTRATION 


USE YOUR VCR SIDE BY SIDE WITH YOUR COM- 
PUTER TO LEARN HOW TO PROGRAM, AND HOW 
TO USE PROGRAMS. YOUR VCR ALONG WITH 
YOUR COMPUTER SERVE AS YOUR PERSONAL 
TUTOR. PAUSE YOUR VCR TO REVIEW AND 
LEARN AT YOUR OWN PACE. 


TAPES NOW AVAILABLE 


CAT# TOPIC APPROX AUN TIME 

BP-3 LEARNING C-64 BASIC 2 HR 349.95 
BP-4 LEARNING VIC-20 BASIC. 2 HR $49.95 
DIO-1 COMMODORE 64 DISK 1/0 1 HR 45 MIN 349.95 
DIO-2 VIC 20 DISK 1/0 1 HR 45 MIN $49.95 
EW-3 CALC-RESULT ADVANCED 1 HR 30 MIN $39.95 
EW-4 CALC RESULT EAZY 1 HR 15 MIN $29.95 
EW-5 PRACTICALC C-64 1 HR 15 MIN 329.95 
EW-6 PRACTICALC VIC-20 1 HR 15 MIN $29.95 
WP-5  SCRIPT-64 1 HR 30 MIN 339.95 
UI-2__ THE LAST ONE 1 HR 30 MIN $39.95 


Electronic worksheets: EW-3-6. Detailed step by step in- 
sturction in the use of electronic spread/sheet software. 
Work along and set up a complete exampte worksheet. 


Basic programming: BP-3 & 4. Teaches BASIC Language 
commands and programming techniques. Builds your know- 
ledge from beginning in advanced levels. 


Data File Programming: DIO-1 & 2 teaches BASIC Language 


data file programming using random, sequential, and relative 
access data files. 


VHS or BETA FORMAT 


Add $3.00 per order for shipping and handling. 
Add $3.00 for C.O.D. 


To Order 
PhoneorWrite  & 








LYNN computer SERVICE 


6831 West 157th Street Tinley Park, Illinois 60477 


(312) 429-1915 


VIC-20 AND COMMODORE 64 ARE TRADEMARKS OF COMMODORE 
BUSINESS MACHINES, INC. CALC-RESULT IS A TRADEMARK OF HANDIC 
SOFTWARE. PRACTICALC IS A TRADEMARK OF COMPUTER SOFTWARE 
ASSOCIATES, 
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BASIC BYTE JUST 
MADE MANAGING YOUR 
STOCK PORTFOLIO EASIER 


Introducing PORTFOLIO MANAGER by Basic Byte, a high- 
quality, easy-to-use software program for use on your 
Commodore 64 or VIC 20 (16K RAM) personal computer. 

It’s designed to eliminate hours of time consuming 
paperwork. And make it easy for you to handle your 
investments. 

PORTFOLIO MANAGER lets you instantly update your 
stock's current value. Calculate gains and losses. Record 
dividends. Print reports. Even determine the price per 
share after your broker's commission. All you have to do 
is follow the easy, step-by-step instructions. 

The price? Only $29.95. And that makes PORTFOLIO 
MANAGER a great investment by itself. 

You'll find PORTFOLIO MANAGER on tape or disk drive 
at your local dealer. Or call direct (313) 540-0655 or write 
P.O. Box 924, Southfield, Ml 48037 and order yours today. 











BASIC BYTE, INC. 





SUPER FORTH 64° 
TOTAL CONTROL OVER YOUR COMMODORE-64" 


ENGLISH LANGUAGE PROGRAMMING EASE! 
1 Home Use, Fast Games. Graphics, Dats, Acquistion, But 
Control, Communi otes Scenic 


© Process 
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A Beginner’s Guide 
To Typing In Programs 


What Is A Program? 


A computer cannot perform any task by itself. 
Like a car without gas, a computer has potential, 
but without a program, it isn’t going anywhere. 
Most of the programs published in COMPUTE!’s 
GAZETTE for Commodore are written ina computer 
language called BASIC, BASIC is easy to learn 
and is built into all VIC-20s and Commodore 64s. 


BASIC Programs 


Each month, COMPUTE!’s GAZETTE for Commodore 
publishes programs for both the VIC and 64. To 
start out, type in only programs written for your 
machine, e.g., “VIC Version” if you have a VIC-20. 
Later, when you gain experience with your com- 
puter’s BASIC, you can try typing in and converting 
certain programs fromanother computer to yours. 
Computers can be picky. Unlike the English 
language, which is full of ambiguities, BASIC usu- 
ally has only one “right way” of stating something. 
Every letter, character, or number is significant. A 
common mistake is substituting a letter such as 
O for the numeral 0, a lowercase | for the numeral 
1, oran uppercase B for the numeral 8. Also, you 
must enter all punctuation such as colons and 
commas just as they appear in the magazine. 
Spacing can be important. To be safe, type in the 
listings exactly as they appear. 


Braces And Special Characters 
The exception to this typing rule is when you see 
the braces, such as “{DOWN}". Anything within 
a set of braces is a special character or characters 
that cannot easily be listed on a printer. When 
you come across such a special statement, refer 
to “How To Type In COMPUTE!’s GAZETTE 
Programs.” 


About DATA Statements 


Some programs contain a section or sections of 
DATA statements. These lines provide information 
needed by the program. Some DATA statements 
contain actual programs (called machine language); 
others contain graphics codes. These lines are espe- 
cially sensitive to errors. 

Ifa single number in any one DATA statement 
is mistyped, your machine could “lock up,” or 
“crash.” The keyboard and STOP key may seem 
“dead,” and the screen may go blank. Don’t panic 
—no damage is done. To regain control, you have 





to turn off your computer, then turn it back on. 
This will erase whatever program was in memory, 
so always SAVE a copy of your program before you RUN 
it, If your computer crashes, you ca LOAD the 
program and look for your mistake. 

Sometimes a mistyped DATA statement will 
cause an error message when the program is RUN. 
The error message may refer to the program line 
that READs the data. The error is still in the DATA 
statements, though. 


Get To Know Your Machine 

You should familiarize yourself with your com- 
puter before attempting to type in a program. 
Learn the statements you use to store and retrieve 
programs from tape or disk. You'll want to save a 
copy of your program, so that you won't have to 
type it in every time you want to use it. Learn to 
use your machine's editing functions. How do 
you change a line if you made a mistake? You can 
always retype the line, but you at least need to 
know how to backspace. Do you know how to 
enter inverse video, lowercase, and control char- 
acters? It’s all explained in your computer's 
manuals. 


A Quick Review 

1. Type in the program a line at a time, in order. 
Press RETURN at the end of each line. Use back- 
space or the back arrow to correct mistakes. 

2. Check the line you've typed against the line in 
the magazine. You can check the entire program 
again if you get an error when you RUN the 
program. 

3. Make sure you've entered statements in braces 
as the appropriate control key (see “How To Type 
COMPUTE!’s GAZETTE Programs” elsewhere in 
the magazine). 








We regret that we are not able to re 
inquiries about programs, produc 
ing in COMPUTE"s GAZETTE for Commodore due to 
increasing publication activity. On those infrequent 
occasions when a published program contains a typo, 
the correction will appear in the magazine, usually 
within eight weeks. If you have specific questions about 
items or programs which you'v 
GAZETTE for Commodore, pleas 
Feedback, P.O. Box 5406, Greensboro, NC 27403. 


spond to individual 
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How To Type In 
COMPUTE!’s GAZETTE Programs 





Many of the programs which are listed in COM- 
PUTE!’s GAZETTE contain special control characters 
(cursor control, color keys, inverse video, etc.). 
To make it easy to know exactly what to type when 
entering one of these programs into your com- 
puter, we have established the following listing 
conventions. 

Generally, any VIC-20 or Commodore 64 
program listings will contain words within braces 
which spell out any special characters: {DOWN} 
would mean to press the cursor down key. {5 
SPACES} would mean to press the space bar five 
times. 

To indicate that a key should be shifted (hold 
down the SHIFT key while pressing the other 
key), the key would be underlined in our listings. 
For example, S would mean to type the S key 
while holding the shift key. This would appear 
on your screen as a “heart” symbol. If you find 
an underlined key enclosed in braces (e.g., {10 
N}), you should type the key as many times as 
indicated (in our example, you would enter ten 
shifted N’s). 

Ifa key is enclosed in special brackets, 4, 
you should hold down the Commodore key while 
pressing the key inside the special brackets. (The 
Commodore key is the key in the lower left corner 
of the keyboard.) Again, if the key is preceded by 
a number, you should press the key as many times 
as necessary. 

Rarely, you'll see a solitary letter of the al- 
phabet enclosed in braces. These characters can 
be entered on the Commodore 64 by holding down 


the CTRL key while typing the letter in the braces. 
For example, {A} would indicate that you should 
press CTRL-A. You should never have to enter 
such a character on the VIC-20, but if you do, you 
would have to leave the quote mode (press RE- 
TURN and cursor back up to the position where 
the control character should go), press CTRL-9 
(RVS ON), the letter in braces, and then CTRL-0 
(RVS OFF). 

About the quote mode: You know that you can 
move the cursor around the screen with the CRSR 
keys. Sometimes a programmer will want to move 
the cursor under program control. That’s why 
you see all the {LEFT}’s, {HOME}’s, and 
{BLU}’s in our programs. The only way the com- 
puter can tell the difference between direct and 
programmed cursor control is the quote mode. 

Once you press the quote (the double quote, 
SHIFT-2), you are in the quote mode. If you type 
something and then try to change it by moving 
the cursor left, you'll only get a bunch of reverse- 
video lines. These are the symbols for cursor left. 
The only editing key that isn’t programmable is 
the DEL key; you can still use DEL to back up and 
edit the line. Once you type another quote, you 
are out of quote mode. 

You also go into quote mode when you IN- 
SerT spaces into a line. In any case, the easiest 
way to get out of quote mode is to just press RE- 
TURN. You'll then be out of quote mode and you 
can cursor up to the mistyped line and fix it. 

Use the following table when entering cursor 
and color control keys: 



















































































































































































When You Read: Press: When You Read: Press: Se When You Read: Press: See: 
{cuR} suit | [cuRome {cyn} | SE Ge ia) 
{HOME} CLRHOME {pur} crrt |[_s E: es e[e] 

{uP} suurr | [@ case g | {GRN) crt If « {r1} |] 
{pown} Pease {BLU} crt |[ 7 {F2} SHIFT a | 
(LEFT) suet | fecrse (yEL} cra |[ | (r3) Lo |] = 
{RIGHT} 1g ] [it } {ra} [sur] [6 (*.} 
{rvs} CTRL 9 £23 rf 5 G {F5) To aae| 1] 
(orF) cra] [0 £33 Gio] Bi te) ou] [ «| 
{BLK} cat} | £43 e(;] f& & 7 Hl 
{war} rat } |_2 £53 e ffs E& {ra} SHIFT 7 i | 
(RED) cm] [3 | £63 €@[« |] 
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The Automatic Proofreader 





“The Automatic Proofreader” will help you type in program 
listings from COMPUTE"'s Gazette without typing mistakes. It 
is a short error-checking program that hides itself in memory. 
When activated, it lets you know immediately after typing a 
line from a program listing if you have made a mistake. 
Please read these instructions carefully before typing any 
programs in COMPUTE!s Gazette. 


Preparing The Proofreader 

1, Using the listing below, type in the Proofreader. The 
same program works on both the VIC-20 and Commodore 
64. Be very careful when entering the DATA statements — 
don't type an Linstead of a 1, an O instead of a 0, extra 
commas, etc. 

2. SAVE the Proofreader on tape or disk at least twice 
before running it for the first time. This is very important because 
the Proofreader erases this part of itself when you first type 
RUN. 

3. After the Proofreader is SAVEd, type RUN. It will 
check itself for typing errors in the DATA statements and 
warn you if there’s a mistake. Correct any errors and SAVE 
the corrected version. Keep a copy in a safe place — you'll 
need it again and again, every time you enter a program 
from COMPUTE"'s Gazette. 

4. When a correct version of the Proofreader is RUN, it 
activates itself. You are now ready to enter a program listing. 
If you press RUN/STOP-RESTORE, the Proofreader is dis- 
abled. To reactivate it, just type the command SYS 886 and 
press RETURN. 


Using The Proofreader 

All VIC and 64 listings in COMPUTE!’s Gazette now have a 
checksum number appended to the end of each line, for example 
“rem 123". Don't enter this statement when typing in a program. 
It is just for your information. The rem makes the number 
harmless if someone does type it in. It will, however, use up 
memory if you enter it, and it will confuse the Proofreader, 
even if you entered the rest of the line correctly. 

When you type in a line from a program listing and 
press RETURN, the Proofreader displays a number at the 
top of your screen. This checksum number must match the 
checksum number in the prifted listing. If it doesn’t, it means 
you typed the line differently than the way itis listed. Im- 
mediately recheck your typing. Remember, don’t type the 
rem statement with the checksum number; it is published 
only so you can check it against the number which appears 
on your screen. 

The Proofreader is not picky with spaces. It will not 
notice extra spaces or missing ones. This is for your conven- 
ience, since spacing is generally not important. But occasion- 
ally proper spacing is important, so be extra careful with 
spaces, since the Proofreader will catch practically everything 
else that can go wrong. 

There's another thing to watch out for: if you enter the 
line by using abbreviations for commands, the checksum 
will not match up, But there is a way to make the Proofreader 
check it. After entering the line, LIST it. This eliminates the 
abbreviations. Then move the cursor up to the line and press 
RETURN. It should now match the checksum. You can check 
whole groups of lines this way. 


Special Tape SAVE Instructions 

When you're done typing a listing, you must disable the 
Proofreader before SAVEing the program on tape. Disable 
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the Proofreader by pressing RUN/STOP-RESTORE (hold 
down the RUN/STOP key and sharply hit the RESTORE 
key). This procedure is not necessary for disk SAVEs, but you 
must disable the Proofreader this way before a tape SAVE. 

SAVE to tape erases the Proofreader from memory, so 
you'll have to LOAD and RUN it again if you want to type 
another listing. SAVE to disk does not erase the Proofreader. 


Replace Original Proofreader 

If you typed in the original version of the Proofreader (Oc- 
tober 1983 issue), you should replace it with the improved 
version below. We added a POKE to the original version to 
protect it from being erased when you LOAD another pro- 
gram from tape. The POKE does protect the Proofreader, 
and the Proofreader itself was not affected. However, a 
quirk in the VIC-20's operating system means that programs 
typed in with the Proofreader and SAVEd on tape cannot be 
LOADed properly later. If you LOAD a program SAVEd 
while the Proofreader was in memory, you see 72LOAD 
ERROR. This applies only to VIC tape SAVEs (disk SAVEs 
work OK, and the quirk was fixed in the Commodore 64). 

If you have a program typed in with the original Proof- 
reader and SAVEd on tape, follow this special LOAD 
procedure: 

1. Turn the power off, then on. 

2. LOAD the program from tape (disregard the 7L.OAD 
ERROR). 

3. Enter: POKE 45, PEEK(174):POKE 46,PEEK(175):CLR 

4. ReSAVE the program to tape. 

The program will LOAD fine in the future. We strongly 
recommend that you type in the new version of the Proof- 
reader and discard the old one. 











Automatic Proofreader For VIC And 64 


100 PRINT" ({CLR]PLEASE WAIT...":FORI=886TO 
1018: READA:CK=CK+A:POKEI, A:NEXT 

IF CK<>17539 THEN PRINT" {DOWN} YOU MAD 
E AN ERROR":PRINT“IN DATA ‘STATEMENTS - 
“sEND 

SYS8B6: PRINT" {CLR} {2 DOWN} PROOPREADER 
ACTIVATED." :NEW 

DATA 173,836,003, 201,150,208 

DATA 901,096,141,151,803,173 

DATA 837, 003,141,152,003,169 

DATA 158,141, 036,003,169,003 

DATA 141,637,003,169, 600,133 

DATA 254, 096,032,087, 241,133 

DATA 251,134, 252,132,253, 008 

DATA 201,013, 240,017, 201,032 

DATA 246, 005,024,101,254,133 

DATA 254,165,251,166, 252,164 

DATA 253, 640,096,169, 613,032 

DATA 210, 255,165,214,141,251 

DATA 003,206, 251,003,169, 000 

DATA 133,216,169,019,032, 210 

DATA 255,169,018,032,210, 255 

DATA 169,058,032, 210,255,166 

DATA 254,169,@00,133,254,172 

988 DATA 151,003, 192,087,208, 006 

994 DATA 632,205,189,076,235, 003 

1608 DATA 032,205,221,169,032,032 

1006 DATA 216,255,032,210,255,173 

1012 DATA 251,003,133,214,076,173 

1018 DATA 003 


110 


126 


886 
892 
898 
904 
9108 
916 
922 
928 
934 
948 
946 
952 
958 
964 
978 
976 
982 


EE OFFER! FREE ! Sy 
Cc iad a STOP PLAYING GAMES 


oS 
S/ 


OMPUTER CASSETTES 
58¢ 


Calculate odds on HORSE RACES with ANY COMPU: 








FREE “Home Budget Planning Program Cassette” TER using BASIC. 
with each order of 20 or more C-10's * Siton WUR of Lous entucy esd sem 
Specify VIC-20, Commodore 64, TI-99/4A, TRS-80 CoCo or MC-10 to predict the odds of me 1980 Kentucky Derby. See 
the Wall Street Journal (June 6, 1960) article on 
* C-10 Length/Free Labels *5 Screw Shell Horse-Handicapping. This system was written and 
* Stora  Lifeti used by computer experts and is now being made available to home computer owners, This 
ge Box add 12¢ each Lifetime money back guarantee ‘method is based on storing data from a large number of races on ahigh speed large scale 
* $2.00 shipping charge — any quantity computer. 23 factors taken trom the “Daily Racing Form” were then analyzed by the 
(Canadian orders $4.00 shipping) comput to ste ow ney infencedtace esis From ese 23 act, en weeound io 
; be the most vital in determining winners. NUMERICAL PROBABILITIES ofeach ofthese 10, 
NJ Residents add 6% sales tax factors were then computed and this forms the basis of this REVOLUTIONARY NEW 
* Send check or money order to: PROGRAM 
—— § SIMPLE TO USE: Obtain “Daily Racing Form’ the day before the races and answer the 10 
PARALLEL SYSTEMS uestions about each Norse. Run the program and your computer will print out the odds for 
PARALLEL SYSTEMS alors each race COMPUTER POWER gves you he avarage! 
Box 772 Dept. V 1m YOUGET 1) Program on cassate of dsk 
. 2) Uist of BASIC programs for use with any cemy 
Blackwood, NJ 08012 3} sruttns on how to a ne needed cata Nahe Daly Racing Fo, 
609-227-9634 4) Tips on using the odds generated by the program. 





5) Sample torm to simply entering data for each race, 

= ——MAIL COUPON OR CALL TODAY——- — 
3G COMPANY, INC. DEPT. GA (503) 357-5607 
RT. 3, BOX 28A, GASTON, OR 97119 

Yes, | want to use my computer for FUN and PROFIT. Please send me ___ programs 
at $29.95 each, Circle the cassette you need: PET/CEM, —VIC-20, Cor Computer, 


TRS-£0, Sinctas Timex 1000, Au, Commodore 64 (disk or cassette), 
‘Apple (Gis or cassette) 


Enclosed is: L] check or money order (J Mastercard C] visa iD 








ARE YOU TIRED OF PAYING HIGH 
SOFTWARE PRICES FOR YOUR 64? 
JOIN THE CLUB! 


You receive 120 programs, on disk or tape, each year 


(10 per month) including business, education, and 
games each month. You also receive software 
discounts, free computer consultation, plus much 
more. All this for $40 per year of $60 for 2 years. Send 
check or money order to: The 64 Club, 1260 Oliver, 
Pacific Beach, CA 92109. 


START USING YOUR COMPUTER FOR 
FUN ana PROFIT! 


The Beginner’s ="{BLU}({RVS}{4 SPACES}" rem 244 












































150 POKE36878, 15:F1=36876 rrem 99 
Corner 176 PRINT "{3 DOWN}{GRN}PRESS Fl TO START 
: a zrem 29 
(Article on page 86.) 188 GET E$:IF E$<>"{Fl}" THEN 188 :rem 31 
198 PRINT "{CLR} zrem 57 
218 FOR I=1T02:FOR J=1T04 rrem 182 
BEFORE TYPING... 226 PRINT TAB(2);A$;BS$;AS$;B$:NEXT J 
Before typing in programs, please refer to “How 
To Type COMP! !’s Gazette Programs,” “A 230 FOR J=1T04:PRINT TAB(2);B$;A‘ 
eginner’s Guide To Typing In Programs,” and EXT J,1 
“The Automatic Proofreader’ that appear before 240 FOR I=1T016:POKE P(I),I:NEXT :rem 127 
the Program Listings. 250 PRINT "{BLK}{2 SPACES}Q=QUIT":rem 201 
266 FOR I=1T08:B(I)=I:B(I+8)=I:NEXT 
rrem 37 
Program 1: Match-Em(VIC Version) — 279 ror 1-17016 ieenes 
1 POKE 36879,27:PRINT"{CLR}(BLU}":DIM A(1 286 RC=INT(16*RND(6)+1):IF B(RC)=6 THEN 2 
6),B(16),C(16),P(16) trem 81 80 trem 33 
26 PRINT "{3 SPACES}** MATCH-EM **":PRINT 290 A(I)=B(RC):B(RC)=0:NEXT trem 35 
"(2 DOWN}CHOOSE TWO LETTERS." :rem 64 306 FOR I=1T016:B(I)=A(I):NEXT :rem 226 
4® PRINT "{DOWN]TRY TO MATCH SHAPES.":PRI  31@ FOR I=1T08 rrem 13 
NT "{DOWN}THE BETTER YOU ARE, 326 F(I)=INT(8*RND(@)):IF F(I)=1 OR F(I)= 
{3 SPACES}THE LOWER YOUR SCORE." 2 OR F(I THEN 326 rrem 116 
rrem 11@ 330 NEXT I:SC=0:S=0 rrem 85 
70 PRINT "{DOWN}JPRESS THE SPACE BAR 348 FOR I=38879T038882:POKE I,@:NEXT 
{3 SPACES}TO CONTINUE." rrem 46 trem 78 
86 PRINT "{2 DOWNJPRESS 'Q' TO QUIT AND S 354 PRINT "{DOWN)PRESS 2 LETTERS 
EE ALL SHAPES." zrem 232 {2 SPACES)-{2 SPACES}-" rrem 182 
9@ FOR I=1T016:READ P(I),C(I):NEXT 360 SC=SC+1:SC$=STR$(SC) rrem 147 


trem 211 378 FOR I= 





TO LEN(SC$):POKE 8158+1I,ASC(M 





180 DATA 7705,2,7709,6,7713,2,7717,6,7793 ID$(SC$,I,1)) :NEXT em 32 
16,7797,2,7861,6,7885,2 rrem 141 380 N1=38813:POKE F1,231 trem & 
126 DATA 7881,2,7885,6,7889,2,7893,6,7969 398 FOR D=1T015@:NEXT D:POKE Fl,@:rem 103 
16,7973,2,7977,6,7981,2 srem 192 406 POKE N1,1:POKE N1,@:GET K$:IF K$=""TH 
146 CC=36726:A$="(RED}{RVS}{4 SPACES}":B$ EN 406 zrem 232 
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419 
426 
438 
440 
450 
470 


480 
498 


508 
518 


526 
536 


548 
550 
570 
580 
598 
686 
650 
668 
698 
708 
716 
728 
736 
748 
758 
760 


788 


810 


826 


850 
880 


910 
948 


976 

1086 
1638 
1868 
1688 


1696 


IF (K$<"A") OR (K$>"Q") THEN 400 

zrem 156 
R=ASC(K$)-64:POKE 8093,R:RI=R :rem 90 
IF K$="Q" THEN 1116 rrem 89 
N=P(R1):A1l=A(R1):IF A(R1)<>@ THEN 470 

zrem 151 
POKE N,24:POKE N+1,24:POKE N+22,24:PO 
KE N+23,24 rrem 254 
ON A(R1) GOSUB 850,880, 910,940,978,18 
00,1030,1060:GOSUB 780 zrem 186 
N1=38815 trem 97 
POKE N1,1:POKE N1,@:GET K2$:IF K2$ 
THEN 496 rrem 94 
IF (K2$<"A") OR (K2$>"Q") THEN 496 





rrem 9 

R=ASC(K2$)-64:POKE 8096,R:R2=R 
rem 144 
IF K2$="Q" THEN 1116 trem 139 


IF K2$=K$ THEN POKE 8696,45:GOTO 498 
srem 78 
N=P(R2):A2=A(R2):IF A(R2)<>9 THEN 576 
rem 157 
POKE N,24:POKE N+1,24:POKE N+22,24:PO 
KE N+23,24 rem 255 
ON A(R2) GOSUB 856,886,910,948,970,16 


80,1030,1060:GOSUB 786 zrem 188 
IF Al=@ THEN 600 trem 208 
IF Al=A2 THEN 650 rrem 25 


POKE Fl,159:FOR D=1TO1@@:NEXT:POKE Fl 
,135:FOR D=1T0160:NEXT:POKE F1,0:GOTO 
730 rem 245 
POKE F1,195:FOR D=1TO100:NEXT:POKE Fl 
,207:FOR D=1T0100:NEXT zsrem 177 
POKE Fl,215:FOR D=1TO100:NEXT:POKE Fl 
,225:FOR D=1TO200:NEXT:POKE F1,0 
rrem 232 
S=S+1:N=8140+S*2 rrem 74 
ON Al GOSUB 858,880,910,940,970,1000, 
1636,1066:GOSUB 786 trem 19 





A(R1L)=0:A(R2)=0 215 
IF S=8 THEN 1080 232 
GET ES:IF E$<>" " THEN 730 156 
L=R2:N=P(R2):GOSUB 810 229 
L=R1:N=P(R1):GOSUB 810 228 





POKE 8693,45:POKE 8696, 45:GOTO360 
rrem 22 
NC=N+CC:J=F(B(R)):POKE NC,J:POKE NC+1 
,J:POKE NC+22,J:POKE NC+23,J:RETURN 
rrem 254 
CL=C(L):POKE N,16@:POKE N+CC,CL:POKE 
(SPACE}N+1,166:POKE N+1+CC,CL :rem 55 
POKE N+22,160:POKE N+22+CC,CL:POKE N+ 
23,160:POKE N+23+CC,CL:POKE N,L:RETUR 
N trem 33 
POKE N,233:POKE N+1,223:POKE N+22,95: 
POKE N+23,105:RETURN rrem 183 
POKE N,85:POKE N+1,73:POKE N+22,74:P0 
KE N+23,75:RETURN trem 53 
POKE N,32:POKE N+1,233:POKE N+22,233: 


POKE N+23,16@:RETURN :rem 173 
POKE N,108:POKE N+1,123:POKE N+22,124 


:POKE N+23,126:RETURN zrem 227 
POKE N,98:POKE N+1,98:POKE N+22,226:P 
OKE N+23,226:RETURN trem 157 
POKE N,225:POKE N+1,97:POKE N+22,225 
:POKE N+23,97:RETURN trem 186 
POKE N,223:POKE N+1,165:POKE N+22,23 
3:POKE N+23,95:RETURN trem 222 
POKE N,83:POKE N+1,83:POKE N+22,83:P 
OKE N+23,83:RETURN srem 98 
FOR I=8876 TO 8096:POKE I,32:NEXT 
zrem 65 
FOR I=1T025:POKE Fl, INT(68*RND(@)+18 
zrem 115 


1100 FOR D=1TO160:NEXT D,I:POKE F1,9 
rrem 253 
1116 FOR R=1TO16:N=P(R) rrem 44 
1120 ON B(R) GOSUB 858,880,916,948,978,19 
0G,1030,1060 trem 98 
1136 GOSUB 780:NEXT trem 93 
1140 PRINT "{UP}TRY AGAIN? (Y/N) 
{7 SPACES}"; rrem 40 
1150 GET E$:IF E$="Y" THEN 198  :rem 229 
1160 IF E$<>"N" THEN 1159 zrem 194 
1178 END rrem 168 


Program 2: Match-Em (64 Version) 
1 POKE 53281,6:PRINT"{CLRJE73" :rem 253 


16 DIM A(16),B(16),C(16),P(16) trem 181 

20 PRINT TAB(13);"** MATCH-EM **":rem 206 
30 PRINT "{2 DOWN]CHOOSE TWO LETTERS." 

srem 98 

4@ PRINT "“{DOWN]TRY TO MATCH THE SHAPES." 

srem 49 

50 PRINT "{DOWN}JTHE BETTER YOU ARE, THE L 

OWER YOUR" rrem 168 

6@ PRINT "SCORE WILL BE." rrem 160 


DOWN}PRESS THE SPACE BAR TO CO 

trem 46 
PRINT "(2 DOWN}PRESS 'Q' TO QUIT AND S 
EE ALL SHAPES." trem 232 
96 FOR I=1TO16:READ P(I),C(I):NEXT 

rrem 211 
1075,2,1080,6,1085,2,1090,6 

:rem 221 
1275,6,1288,2,1285,6,1290,2 

trem 230 
1475,2,1480,6,1485,2,1490,6 

rrem 239 
1675,6,1680,2,1685,6,1690,2 

srem 248 
146 CC=54272:AS="{RED}{RVS}{5 SPACES}":B$ 

="({BLU} (RVS}{5 SPACES)" rem 252 

150 POKE54296, 15: POKE54291, 8: POKE54292,8 


78 





8a 


108 DATA 
118 DATA 
126 DATA 


138 DATA 


trem 6 

160 F1=54287 :F2=54286 :W=54290 trem 31 
176 PRINT "{3 DOWN)(WHT}PRESS Fl TO START 
® trem 4 


180 GET ES:IF E$<>"({F1}" THEN 180 
196 PRINT "{CLR}"; 
208 POKE 53281,1 
210 FOR I=1T02:FOR J=1T05 
226 PRINT TAB(1@);A$;B$;A$;B$:NEXT J 
zrem 239 

236 FOR J=1TO5:PRINT TAB(10);BS;A$;B$;AS$: 

NEXT J:NEXT I :rem 99 
240 FOR I=1T016:POKE P(1)+41,1:NEXT I 





trem 88 
250 PRINT TAB(31);"{BLK}{UP}Q=QUIT" 

rem 33 
2668 FOR I=1T08:B(I)=I:B(I+8)=I:NEXT I 

rem 116 
270 FOR I=1TO16 trem 65 


286 RC=INT(16*RND(@)+1):IF B(RC)=0 THEN 2 
rem 33 


80 
298 A(I)=B(RC):B(RC)=O:NEXT I 
308 FOR 7T016:B(I)=A(I):NEXT I 
318 FOR I=1T08 
326 F(1)=INT(16*RND(O)):IF F(I)=1 OR F(I) 
=2 OR F(I)=6 THEN 326 srem 163 
338 NEXT 1:SC=0:S=0 trem 85 
340 FOR 1=56250 TO 56254:POKE I,0:NEXT I 











trem 127 

350 PRINT "{DOWN}PRESS 2 LETTERS 
{3 SPACES}-{2 SPACES}-" rem 182 
368 SC=SC+1:SC$=STR$(SC) trem 147 


370 FOR I=l1 TO LEN(SC$):POKE 1978+I,ASC(M 
ID$(SC$,I,1)):NEXT I trem 168 
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386 


390 
496 


410 


420 
430 
446 


450 
460 


4718 


486 
496 


520 


516 


520 
530 


540 


550 
560 


576 


586 
598 
680 


616 
626 


630 
640 
650 


660 
670 
680 


696 
708 


718 
726 
738 
7408 
750 
766 
770 
786 


798 


800 
810 
820 
830 


840 
858 


N1=56154:POKE F1,84:POKE F2,125:POKE 





{SPACE}w,17 srem 205 
FOR D=1T015@:NEXT D:POKE W,@ :rem 71 
POKE N1,1:POKE N1,9:GET K$:IF K$=""TH 
EN 499 rem 232 
IF (K$<"A") OR (K$>"Q") THEN 400 

trem 156 
R=ASC(K$)-64:POKE 1882,R:R1=R :rem 89 
IF K$="Q" THEN 1110 srem 89 
N=P(R1):Al=A(R1):IF A(R1)<>@ THEN 478 

trem 151 
FOR I=N TO N+8@ STEP 40 trem 128 


FOR J=I TO I+2:POKE J,24:NEXT J,1:GOT 
0 486 trem 38 
ON A(R1) GOSUB 856,880,918, 948,976,10 
98,1638,1860:GOSUB 788 rem 186 
N1=56157 trem 96 
POKE N1,1:POKE N1,@:GET K2$:IF K2$="" 
THEN 496 trem 94 
IF (K2$<"A") OR (K2$>"Q") THEN 496 





rem 9 
R=ASC(K2$)-64:POKE 1885,R:R2=R 
srem 143 
Q" THEN 1116 trem 139 
$ THEN POKE 1885,45:GOTO 496 
srem 77 
N=P(R2):A2=A(R2):IF A(R2)<>@ THEN 570 
rem 157 
FOR I=N TO N+8@ STEP 46 rrem 121 


FOR J=I TO I+2:POKE J,24:NEXT J,1:GOT 
O 666 zrem 33 
ON A(R2) GOSUB 856,880,910,940,976,10 


@6,1830,1060:GOSUB 780 trem 188 
IF Al=@ THEN 680 rrem 208 
IF Al=A2 THEN 650 rrem 25 


POKE Fl,21:POKE F2,31:POKE W,17 

trem 144 
FOR D=1 TO 100:NEXT rem 221 
POKE Fl,16:POKE F2,195:POKE W,17 

rem 269 
FOR D=1 TO 100:NEXT:POKE W,@ :rem 251 
GOTO 738 rrem 109 
POKE F1,34:POKE F2,75:POKE W,17:FOR D 
=1T0160:NEXT trem 33 
POKE F1,43:POKE F2,52:POKE W,17:FOR D 
=1T0100:NEXT:POKE W,0 rem 57 
POKE F1,51:POKE F2,97:POKE W,17:FOR D 
=1 TO 100:NEXT trem 38 
POKE F1,68:POKE F2,149:POKE W,17:FOR 
{SPACE}D=1 TO 2006:NEXT:POKE W,0 

rem 122 
S=S+1:N=1901+S*4 srem 74 
ON Al GOSUB 858,880,916,946,976,1686, 
1038,1066:GOSUB 786 








A(R1)=6:A(R2)=8 
IF S=8 THEN 1080 rrem 232 
GET ES:IF E$<>" " THEN 730 :rem 156 
L=R2:N=P(R2):GOSUB 810 srem 229 
L=R1:N=P(R1):GOSUB 810 trem 228 
POKE 1882,45:POKE 1885,45 rrem 8 
GOTO 368 rrem 112 
NC=N+CC:FOR I=NC TO NC+8@ STEP 40 
trem 11 
FOR J=I TO I+2:POKE J,F(B(R)):NEXT J, 
I trem 51 
RETURN rrem 120 
CL=C(L) trem 69 
FOR I=N TO N+80 STEP 40 rrem 121 


FOR J=I TO I1+2:POKE J,16@:POKEJ+CC,CL 
:NEXT J,1I rem 104 
POKE P(L)+41,L:RETURN trem 218 
POKE N,32:POKE N+1,32:POKE N+2,233 
zrem 39 
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860 POKE N+46,32:POKE N+41,233:POKE N+42, 
168 zrem 81 
870 POKE N+8G,233:POKE N+81,160:POKE N+82 
169:RETURN zrem 176 
880 POKE N,32:POKE N+1,16@:POKE N+2,32 
zrem 41 
896 POKE N+4G,166:POKE N+41,160:POKE N+42 
1168 trem 133 
900 POKE N+80,32:POKE N+81,160:POKE N+82, 
32:RETURN rrem 63 
918 POKE N,85:POKE N+1,67:POKE N+2,73 
trem 6 
920 POKE N+40,66:POKE N+41,32:POKE N+42,9 
3 rrem 247 
938 POKE N+88,74:POKE N+81,64:POKE N+82,7 
5:RETURN trem 34 
948 POKE N,108:POKE N+1,98:POKE N+2,123 
srem 161 
956 POKE N+40,225:POKE N+41,160:POKE N+42 
197 rrem 93 
966 POKE N+86,124:POKE N+81,226:POKE N+82 
126:RETURN zrem 174 
976 POKE N,233:POKE N+l,160:POKE N+2,223 
trem 142 
980 POKE N+40,160:POKE N+41,160:POKE N+42 
7168 trem 133 
998 POKE N+80,95:POKE N+81,1606:POKE N+82, 
165:RETURN :rem 136 
1986 POKE N,32:POKE N+1,233:POKE N+2,223 
zrem 125 
1610 POKE N+4@,233:POKE N+41,160:POKE N+4 
2,105 rem 166 
1620 POKE N+80,95:POKE N+81,105:POKE N+82 
,32:RETURN zrem 113 
1630 POKE N,112:POKE N+1,114:POKE N+2,119 
zrem 168 
1040 POKE N+40,107:POKE N+41,91:POKE N+42 
7115 trem 125 
1058 POKE N+84,109:POKE N+81,113:POKE N+8 
2,125:RETURN srem 216 
1066 FOR I=N TO N+80 STEP 40 trem 166 
1676 FOR J=I TO I+2:POKE J,83:NEXT J,1:RE 
TURN srem 100 
1086 FOR I=1864 TO 1885:POKE I,32:NEXT I 
zrem 135 
1696 FOR I=1T025:POKE Fl, INT(60*RND()+34 
):POKE F2,INT(100*RND(@)+55) em 63 
1166 POKE W,17:FOR D=1T0166:NEXT D:POKE W 
,@:NEXT I trem 126 
1116 FOR R=1T016:N=P(R) zrem 44 
1126 ON B(R) GOSUB 850,880,910,948,970,10 
99,1030,1666 rem 90 
1136 GOSUB 780:NEXT R rem 175 
1146 PRINT "{UP}TRY AGAIN? (Y/N) 
{7 SPACES}"; trem 40 
1150 GET E$:IF E$="Y" THEN 198 trem 229 
1160 IF E$<>"N" THEN 1158 rrem 194 
11798 END rem 160 


Machine Language 
For Beginners - 


(Article on page 116.) 
Program 2: VIC Slist 


16 
26 
368 
40 
56 


1=12288 

READ A:IF A=256 THEN 59 

POKE I,A:CK=CK+A:I=I+1:GOTO 26 

END 

IF CK<>7619 THEN PRINT"ERROR IN DATA S 
TATEMENTS" : STOP 


12288 DATA 162,1,32,198,255,162 
12294 DATA 6,32,2087,255, 262,298 
12368 DATA 259,32,207,255,164,144 
12386 DATA 208,28,201,0,248,14 
12312 DATA 201,32,144,241,201,128 
12318 DATA 176, 237,32,219,255,76 
12324 DATA 13,48,169,13,32,218 
12338 DATA 255,162,3,76,7,48 
12336 DATA 32,204,255,96,256 


Program 3: 64 Slist 

16 1=49152 

20 READ A:IF A=256 THEN 50 

30 POKE I,A:CK=CK+A:I=I+1:GOTO 20 

48 END 

50 IF CK<>7307 THEN PRINT "ERROR IN DATA 
{ SPACE] STATEMENTS" : STOP 

49152 DATA 162,1,32,198,255,162 

49158 DATA 6,32,207,255,2062, 208 

49164 DATA 256,32,207,255,164,144 

49176 DATA 268, 28,261,6,246,14 

49176 DATA 261,32,144,241,261,128 

49182 DATA 176,237,32,216,255,76 

49188 DATA 13,192,169,13,32,218 

49194 DATA 255,162,3,76,7,192 

49208 DATA 32,204,255,96,256 


Power BASIC: 
Numeric Keypad 


(Article on page 120.) 


Program 1: 
Numeric Keypad (64 Version) 
3 FORI=50176T050261:READX:POKEI,X :rem 40 


4 NEXT trem 115 
16 FORI=46960T049151:POKEL, PEEK(I):NEXT 
rem 142 
20 FORI=57344T065535: POKEI, PEEK(I) :NEXT 
trem 151 
25 PRINT" TRANSFERRED" rrem 126 
30 POKE 58823,76:POKE58824, 0: POKE58825,19 
6 rrem 70 
31 POKE58586,169:POKES8587,1:POKES8588, 23 
4 rrem 134 
32 FORI=44029T044634: POKEI, 234:NEXT 
trem 103 
4@ POKE 1,53 trem 88 


50@ DATA2O1, 14, 240, 65, 44, 40, 196, 24 

6, 28, 201, 85, 240, 40, 201 :rem 221 

510 DATA73, 246, 46, 201, 79, 248, 40, 20 

1, 74, 248, 16, 201, 75, 246 :rem 221 

520 DATA16, 261, 76, 248, 16, 201, 77, 24 

@, 28, 88, 24, 96, 6, 169 rem 103 

538 DATA 49, 208, 248, 169, 50, 208, 244, 
169, 51, 208, 248, 169, 52, 208 

rem 163 

548 DATA 236, 169, 53, 208, 232, 169, 54, 
208, 228, 169, 48, 268, 224, 169 

trem 224 

550 DATA 255, 77, 46, 196, 141, 46, 196, 

(SPACE}88, 165, 198, 246, 252, 126, 7 

6 trem 117 

568 DATA 186, 229 trem 23 


Program 2: 
Numeric Keypad (VIC Version) 
5 POKES6, PEEK(56)-1:POKE55,0:CLR :rem 132 


16 I=PEEK(56)*256 trem 143 
2@ READ A;IF A=256 THEN 40 rem 54 
36 POKE I,A:I=I+1:GOTO 26 rem 130 


40 I=PEEK(56)*256 :rem 146 
41 SH=1/256:SL=17 rrem 208 
42 RH=SH:RL=50 trem 82 
43 POKEI+2,SL:POKEI+7,SH rrem 226 
44 POKEI+36, RH: POKEI+39, RL rrem 77 
58 SYS(PEEK(56)*256) :END rrem 110 
828 DATA 126,169,77,141, 20,3 rrem 108 
834 DATA 169,3,141,21,3,88 rrem 4 
84% DATA 169,0,133,254,96,104 :rem 152 
846 DATA 133,251,104,133, 252,104 :rem 33 
852 DATA 133,253,165, 253, 72,165 :rem 1 
858 DATA 252,72,165,251,72,169 rem 218 
864 DATA 3,72,169,110,72,8 :rem 7 
870 DATA 169,6,72,72,72,76 trem 13 
876 DATA 191,234, 234,165,197,201 :rem 56 
882 DATA 8,208,103,173,141,2 trem 97 
888 DATA 41,4,246,96,165,254 srem 115 
894 DATA 201,6,248,16,169,0 trem 43 


966 DATA 133,254,32,159,255,165 rem 253 
986 DATA 197,201,64,208,247,24  :rem 208 


912 DATA 144,68,169, 255,133,254 trem 7 
918 DATA 32,159,255,165,197, 201 trem 8 
924 DATA 64,208, 231,162,0,189 trem 154 
938 DATA 119,2,201,85,208,2 trem 43 
936 DATA 169,52,201,73,208,2 trem 164 
942 DATA 169,53,281,79,208,2 trem 108 
948 DATA 169,54,201,74,208,2 trem 119 
954 DATA 169,49,201,75,208,2 trem 112 
968 DATA 169,58,201,76,208,2 trem 162 
966 DATA 169,51,201,77,208,2 zrem 119 
972 DATA 169,48,157,119,2,232 trem 165 


978 DATA 224,10,208,203,104,168 :rem 250 
984 DATA 104,170,104,64,165,254 :rem 254 
998 DATA 201,8,268,189,24,144 trem 158 
996 DATA 241,256 trem 34 


Nevets 


(Article on page 52.) 


Program I: Nevets—VIC Version 


5 PRINT" (CLR}{BLK}(9 DOWN) WE ARE ON THE 
{SPACE}WAY TO (22 RIGHT}{2 SPACES}THE 
{RVS}LAND OF ADNERB{OFF}" trem 171 

18 POKES2, 28:POKE56,28:CLR em 18 

26 X=36879:Y=41.25:FORI=7168107679:POKEL, 

PEEK(I+256@0) : POKEX,Y:Y=Y+.25:NEXT 






trem 66 
36 FORC=7432T07511:READA: POKEC,A:NEXT: POK 
E36869,255 srem 117 


40 DATA129,66,36,24,24,36,66,129,16, 24,28 
138,27,25,24,255,8,24,56,120,216,152,2 
4,255 rem 91 

5@ DATA24, 24,24, 24,24, 24,24,255,255,153,1 
53,153,153,153,153 :rem 127 

55 DATA255,145,82,0,27,216,0,74,137 

trem 236 

66 DATA16,56,56,84,146,56,40,40,16,24,12, 

6,3,1,9,9,8,24,48,96,192,128,8,8 
rem 37 

7® DATA129,99,36,98,98,36,98,129 :rem 99 

75 PRINT" {CLR}":X=7944:CL=367 26: FORA=1T02 
: FORB=1T022: POKEX+CL, 6: POKEX, 37:X=X+1: 














NEXT: X=X+198 rem 26 

80 NEXT trem 167 

968 FORA=7713T08175STEP22:POKEA+CL, 6: POKEA 

,32:NEXT zsrem 44 
116 FORB=6TO96 : READC: POKE831+B,C:NEXT 

trem 45 

126 DATA169,6,141,62,3 trem 94 


138 DATA141,69,3,141,61,3,169,0,141,19,14 

5,169,127,141,34,145,173,32,145,41,12 

8 trem 82 
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149 DATA261,8,208,5,169,1,141,60,3,169,25 
5,141,34,145,173,17 rrem 171 

145 DATA145,41,8,201,6,208,5,169, 22 
trem 225 
158 DATA141,66,3,173,17,145,41,16,201,6,2 


@8,5,169,1,141 zrem 169 

155 DATA61,3,173,17,145,41,4,201,8,208,5 
rem 207 

160 DATA169, 22,141,61,3,173,17,145,41, 32, 
201,0,208,5,169,1,141,62,3,96:rem 147 





165 V=6:GOTO179 srem 166 
686T07745:POKEI,32:NEXT :rem 23 
=O: 2U=6 trem 265 





POKEF, 3. 
OSUB8@O : FORX=7757TO8175STEP22: POKEX,3 


OKEK , 32 : POKEQ, 32: GOSUB9B9:G 


2:NEXT trem 71 
185 GOSUB95@6:YY=YY+1 : IFYY=10THENYY=1 : E=E- 











(E*.5):d=d-(3*.5) rrem 12 
198 A=8175:C=36:D=G:1=0:0=8:TI$="000000": 
Y=@ :W=W+1:Q=A:AA=36874: POKEAA+4, 15:BB 
=206:CC=1 rem 163 
208 SYS831:M=PEEK(828)-PEEK(829) :P=PEEK(8 
30) trem 39 


218 D=D+1:IFD=ETHEND=@: POKEF, 32:F=F+G:POK 
EF+CL, 2: POKEF, 39: IFPEEK(F+G)=38THENGO 


SUB700 zrem 203 
215 IFPEEK(F+G+22)<>37THENPOKEF, 32:GOSUB9 
Oo zrem 80 


226 I=I+1:IFI=JTHENI=@: POKEK, 32:K=K+L: POK 
EK+CL, 2: POKEK, 39: IFPEEK(K+L)=38THENGO 


SUB68S rem 12 
225 IFPEEK(K+L+22)<>37THENPOKEK, 32 :GOSUB8 
86 zrem 95 
230 IFR=1THEN245 trem 174 


235 IFP=1THENQ=A:S=SS:T=TT:R=1:GOTO245 
trem 268 
248 GOTO276 rem 104 
245 IFPEEK(Q+22+S)=370RPERK(Q+22+S)=38THE 
NPOKEQ, 32:R=0:GOTO2706 srem 7 
250 IFPEEK(Q+22+S)=39THENY=Y+1 :POKEQ, 32:Q 
=Q+22+S:POKEQ+CL, 7: POKEQ, 42: GOSUB400: 
GOTO260 trem 10 
255 GOTO265 srem 114 
260 POKEQ, 32:POKEF, 32:POKEK, 32:GOSUB890:G 
OSUB9@O: R=9:GOTO279 trem 216 
265 POKEQ, 32:Q=Q+22+S:POKEQ, T: POKEAA+1,BB 





+S 131 
270 IFM=-22THENB=33 :GOTO280 108 
275 B=32 rem 138 


288 IFA+M>81850RA+M<7746THENM=6 : B=32 

zrem 107 
285 IFM=1THENC=34:M=0:SS=1:TT=40 :rem 196 
290 IFM=-1THENC=35 :M=8:SS=-1:TT=41:rem 28 








295 IFM=210RM=-21THENM=0 rem 192 
30@ POKEA,B:A=A+M: POKEA,C: POKEAA+CC, BB+M 
rem 191 


305 PRINT" (HOME) {WHT} TIME({ BLK} "60-INT(TI/ 
60)"(LEFT} ":PRINT"{HOME}{10 RIGHT} 
(WHT} LEVEL{BLK}";W 

310 PRINT" {HOME} {DOWN} {WHT }H.S. {BLK} 
RINT" {HOME} {DOWN} {1@ RIGHT} (WHT}SCORE 
{BLK}";U:IFTI/60>=69THEN5OO  :rem 56 

315 PRINT" {HOME}{2 DOWN}{16 RIGHT] (WHT}HA 
VE({BLK}";¥ rrem 188 

316 PRINT" {HOME}{2 DOWN} (WHT]NEVETS REMAI 
N{BLK)";YY-¥ trem 57 

320 POKEAA+2,@:POKEAA+1, @:CC=CC+1:IFCC=3T 





HENCC=1 :rem 99 
325 IFY=YYTHENU=U+(19*(60-INT(TI/66))):GO 
TO180 zrem 236 
330 GOTO266 trem 97 


406 U=U+50:POKEAA+3,BB:FORX=1L5TOOSTEP-1:P 
OKEAA+4, X: FORDD=1T050: NEXT : NEXT: POKEA 
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A+3,0 trem 17 
410 POKEAA+4, 15: RETURN :rem 81 
500 POKEAA+4,@:PRINT"{HOME}{2 DOWN} {BLK} 

{6 SPACES}GAME{2 SPACES}OVER 

{6 SPACES}":FORX=1T02096:NEXT: rem 236 
505 IFU>VTHENV=U trem 41 
516 PRINT" {HOME}{2 DOWN}{BLK}PRESS TRIGGE 





R TO START" trem 254 
520 P=PEEK(37151):F! ((PAND32)=6):rem 94 
530 IFFB<>1THEN520 trem 32 
548 GOTO 168 rem 113 


600 POKEK, 32: POKEK+L, 32:0=0+1:IFO=4THENSO 

r) :rem 27 
619 GoTOBGG rem 104 
760 POKEF, 32:POKEF+G,32:0=0+1:IFO=4THEN5O 

t) trem 13 
718 GoTO960 :rem 186 
860 N=INT(RND(1)*4)+1:ONNGOTO810, 826,830, 

840 rem 203 
810 K=7922:L=+1:RETURN 
820 K=7943:L=-1:RETURN 
830 K=8142:L=+1:RETURN 
840 K=8163:L=-1:RETURN 
900 H=INT(RND(1)*4)+1:ONHGOTO910, 920,930, 

946 trem 196 





918 F=7922:G=+1:RETURN trem 37 
926 F=7943:G=-1:RETURN trem 43 
930 F=8142:G=+1:RETURN trem 34 
949 F=8163:G=-1:RETURN zsrem 49 


958 X=7932:POKEX+CL, 4: POKEX, 38:X=X+2: POKE 
X+CL, 4: POKEX, 38:X=X+218: POKEX+CL,4:PO 
KEX, 38 rrem 18 

960 X=X+2:POKEX+CL, 4: POKEX, 38: RETURN 

srem 54 


Program 2: Nevets—64 Version 


2 PRINTCHRS (142) :POKE5S6,48:CLR rrem 47 
3 FORL=54272T054296: POKEL, 6: NEXT: POKE5429 
6,15:POKE54277,72:POKE54278,90 :rem 242 
4 HP=54273:LF=54272:VO=54276 trem 53 
5 POKE53281,1:POKE53280,15:PRINT" {CLR} 
(12 Down}"TAB(10)"{RED}PLEASE WAIT A MO 


MENT" trem 20 
16 PRINTCHRS (142) : POKE56334, PEEK (56334) AN 
D254 rrem 90 


11 POKE1,PEEK(1)AND251:FORI=0T0511:POKEI+ 
12288, PEEK(I+53248) :NEXT trem 136 
13 POKE1, PEEK(1)OR4:POKE56334, PEEK (56334) 
ORL trem 83 
20 POKE53272, (PEEK(53272)AND240)OR12 
trem 247 
30 FORC=12806T012879:READA: POKEC,A:NEXT 
rrem 156 
4@ DATA129, 66, 36,24, 24,36,66,129,16, 24,28 
730,27,25,24,255 rrem 44 
45 DATAS, 24,56,120,216,152,24,255:rem 134 
50 DATA24, 24, 24,24, 24,24, 24,255,255,153,1 
53,153,153,153,153,255 :rem 71 
55 DATA145,82,0,27,216,0,74,137 :rem 36 
6@ DATA16,56,56,84,146,56,48,40,16,24,12, 
6,3,1,0,0,8,24,48,96,192,128,0,0 
zrem 37 
7® DATA129,90,36,90,90,36,96,129  :rem 99 
73 PRINT"{CLR}{12 DOWN}"TAB(16)"{RED}NEVE 
TS": FORI=1T02060:NEXT trem 20 
75 PRINT" (CLR}":CL=54272:FORX=1584T01623: 
POKEX+CL, 6 : POKEX, 68 : POKEX+400+CL, 6 


zrem 165 
88 POKEX+400,68:NEXT :rem 193 
96 GOTO 168 rem 65 


190 JV=PEEK (56320) :P=15-(JVAND15) :FR=JVAN 

D16 trem 81 
161 IFP=Q9ANDFR=16THENRETURN trem 252 
165 IFP=O0ANDC=65THENS=41 :T=71 trem 247 


106 


119 


265 
305 


IFP=@ANDC=66THENS=39 : T=72: RETURN 
rem 27 

IFP=1THENA=A-40: IFA<1164THENA=1164:RE 
TURN zrem 3 
IFP=2THENA=A+4@ : IFA> 2004 THENA=2004 : RE 
TURN rem 249 
IFP=4THENC=66 :S=39:T=72; RETURN 

trem 131 
IFP=5THENA=A-4@ : C366 :S=39:T=72:IFA<11 
64THENA=1164:RETURN zrem 158 
IFP=6THENA=A+4@ : C=66 :S=39:T=72:1FA>26 
®4THENA=2804 : RETURN rrem 148 
IFP=8THENC=65:S=41:T=71:RETURN:rem 127 
IFP=9THENA=A-40 :C=65:S=41:T=71:IFA<11 
64THENA=1164;: RETURN :rem 154 
IFP=10THENA=A+4@ :C=65:S=41:T=71:1FA>2 


OO4THENA=2604 : RETURN rrem 183 
RETURN zrem 118 
v=o :rem 98 


E=8:J=16: YY=0:W=0 :U=@ : FORI=1924T01263 
:POKEI, 32:NEXT rrem 162 
POKEF , 32: POKEK, 32: POKEQ, 32 trem 51 
F=1944:K=F:G=1:L=G:FORX=1984T02004STE 
P40: POKEX, 32 trem 205 
NEXT: GOSUB95@ : YY=YY+1: IFYY=190THENYY=1 
:EsE-(E*.5):J=J-(J*.5) rem 133 
A=2004 :C=67:D=0:1=0:0=0:TIS BBOBG": 
Y=O6:W=W+1 trem 243 
GOSUB1166 rem 225 
GOSUB10@; POKEA+CL, @: POKEA, C: IFA<2004T 
HENPOKEA+40+CL,@:POKEA+40,64 :rem 155 
IFP=20RP=6ORP=10THENPOKEA~40+CL, 1: POK 
EA+CL,@:POKEA,C rem 248 
IFFR=0ANDA< 2004THENQ=A trem 59 
POKEHF, 34: POKELF, 75: POKEVO,65:FORI=1T 
O05 :NEXT zrem 69 
IFFL=1THENPOKEF ,, 32: GOSUB896 : F=KK: G=LL 
zrem 84 
POKEF, 32: F=F+G: POKEF+CL, 2: POKEF, 78 
trem 26 
IFPEEK(F+G )=73ANDFL=@6THENPOKEVO, 64:GO 
T0700 rem 112 
IFPEEK(F+4@+G ) <> 68THENPOKEF, 32: POKEVO 
,16:GOSUB806 : F=KK:G=LL rrem 157 
POKEHF, 45: POKELF, 198: POKEVO,17:FORI=1 





TOS:NEXT rem 124 

IFKL=1THENPOKEK, 32: GOSUB8@@: K=KK: L=LL 
rrem 106 

POKEK, 32: K=K+L: POKEK+CL, 2: POKEK, 78 
:rem 58 


IFPEEK(K+L)=73ANDKL=0THENPOKEVO, 64:GO 
TO6GO 
IFPEEK(K+49+L) <> 68THENPOKEK, 32: POKEVO 
, 16 :GOSUB806 : K=KK: L=LL 
KL=6:FL= FFR=OTHEN235 
GOSUB100@: POKEA+CL, @: POKEA, C: IFA<2004 
THENPOKEA+4@+CL,@: POKEA+4@,64:rem 207 
IFP=2THENPOKEA-40+CL, 1: POKEA+CL, 0: POK 






EA,C zrem 5 
IFFR=OANDQ< 2004ANDC<>67THENPOKEQ, 32:G 
OTO242 rrem 156 
GOTO365 rem 163 


POKEHF, 100: POKELF, 85: POKEVO,17:FORI=1 
TO1®:NEXT trem 157 


IFPEEK(Q+S )=70THENPOKEQ, 32:Q=Q+S: POKE 
Q+CL, 11: POKEQ, 69: GOSUB46 : GOTO305 
rem 154 


IFPEEK(Q+S)=73THENPOKEQ+S+CL, 

S,73:GOTO305 

IFPEEK (Q+S ) =68ORPEEK (Q+S ) =69THENPOKEQ 

,32:POKEVO,16:FR=16:GOTO305 = :rem 10 

IFC <> 67THENQ=Q+S : POKEQ+CL, 6: POKEQ, T 
rrem 236 

POKEVO, 16:PRINT" {HOME} {BLU} TIME{BLK}" 








386 
3108 


60-INT(TI/66)"{LEFT} "; 





BRENTTAR (38) “(BEN DEVE (SLIDE Wi 
PRINT" {HOME} {DOWN} {BLU}HIGH SCORE 
(BLK}";V; 


PRINTTAB (30) "{BLU} SCORE {BLK} 
60>=60THEN5SOO 

PRINT" {HOME} {2 DOWN) {BLU]NEVETS REMAT 
NING {BLK} ";YY-Y;SPC(11)"{BLU}HAVE 





{BLK}";¥ srem 175 
IFY=YYTHENU=U+(10* (68-INT(TI/68))):GO 
T0175 trem 235 


GOSUB1@0@ : POKEA+CL, @: POKEA, C: IFA<2004 
THENPOKEA+4@+CL, @: POKEA+40,64:rem 207 
IFP=2THENPOKEA-48+CL, 1: POKEA+CL , 0: POK 
EA,C 
IFFL=1ORKL=1 THEN 206 
IFFR<>@THEN200 
IFPEEK (Q+S )=7@THENPOKEQ, 32 
Q+CL,11:POKEQ, 69: GOSUB498 : GOTO286 
srem 147 
IFPEEK(Q+S )=73THENPOKEQ+S+CL, 2: POKEQ+ 
S,73:GOTO206 zrem 46 
IFPEEK(Q+S )=680RPEEK(Q+S )=69THENPOKEQ 
,32:POKEVO,16:FR=16 :GOTO208 trem 9 
IFC <> 67THENPOKEQ, 32:Q=Q+S: POKEQ+CL, 8: 
POKEQ,T:GOTO211 trem 62 
GOTO208 trem 97 
U=U+50: Y=¥+1:FR=15:KL=1: POKEVO, 16: POK 








EHF, 68: POKELF, 200: POKEVO, 129 trem 5 
IFPEEK(F)=69THENF' trem 191 
IFPEEK(K)=69THENKL=1 trem 202 


FORI=1T050:NEXT: POKEVO, 128: POKEQ, 32:R 
ETURN trem 238 
PRINT" (HOME}{3 DOWN} {BLK}(15 SPACES}G 
AME{2 SPACES }OVER" : FORX=1T02000 : NEXT 
srem 87 
IFU>VTHENV=U rrem 41 
PRINT" {DOWN} {BLK} (1 SPACES}PRESS TRI 


GGER TO START" trem 218 
P=PEEK(56320):FR=PAND16 rem 51 
IFFR<>OTHEN5S 20 rem 47 
GoTo 170 trem 106 
POKEK, 32: POKEK+L, 32:0=0+1 :1FO=4THENSO 
@ trem 27 
GOSUB866 : K=KK: L=LL: GOTO235 trem 111 


POKEF , 32: POKEF+G, 32 :0=0+1: IFO=4THENSO 
® srem 13 
GOSUB80@ : F=KK:G=LL:GOTO222 rrem 98 
N=INT(RND(1)*4)+1:ONNGOTO819, 820,839, 


848 trem 203 
KK=1544:LL=+1:RETURN rem 191 
KK=1583:LL=-1:RETURN srem 197 
KK=1944:LL=+1: RETURN srem 197 
KK=1983:LL=-1:RETURN rem 263 


X=1563: POKEX+CL, 2: POKEX, 73:X=X+2: POKE 
X+CL, 2: POKEX, 73:X=1963:POKEX+CL, 2 


trem 97 
POKEX, 73:X=X+2: POKEX+CL, 2: POKEX, 73: RE 
TURN :rem 138 
JV=PEEK (56320) :P=15-(JVAND15) 

srem 152 


IFP=@6THENRETURN 
IFP=1THENA=A-4@ : IFA<1164THEN: 
ETURN 
IFP=2THENA=A+4@ : I[FA> 2004THEN: 
ETURN 

IFP=4THENC=66 : RETURN 
IFP=8THENC=65 : RETURN 

RETURN :rem 166 
PRINT" {HOME}{20 DOWN}"TAB(17)"{RED}L 
EVEL{BLK}";W: FORI=1T0199@ :NEXT: PRINT 
" (HOME }" 
FORI=1824T01863 : POKEL , 32 :NEX' 








French Tutor 


(Article on page 70.) 





BEFORE TYPING... 


Before typing in uprO rams, please refer to “How 
0) 


To Type 


TE!’s Gazette Programs,” “A 


pemanene Guide To Typing In Programs,” and 


e Automatic Proofreader” that appear before 


the Program Listings. 





Program I: vic French Tutor, 
Part 1: Redefined Characters 


10 
20 


30 
40 


58 
68 
76 
80 
98 
168 
116 
120 
138 
146 
156 
160 
176 
186 
198 


200 
216 


2208 
238 
260 


276 
288 


298 
308 
3106 
320 
330 
346 
358 
3708 


380 
398 
468 


410 


146 


POKE36879, 237 zrem 105 
PRINT"(CLR}{4 RIGHT}{4 DOWN} {BLK}"CHRS 
(122) trem 245 
FORT=1T08 rrem 231 
PRINTTAB(4)"{BLK}"CHR$(125)"{BLU} {RVS} 
{4 SPACES} (wHT}{4 SPACES) {RED} 


{4 SPACES}" trem 161 
NEXT trem 164 
PRINTTAB (4) "{BLK} "CHR$ (125) trem 13 
PRINTTAB(4) "{BLK}"CHRS$(125) trem 14 
$1=36876:V=36878: POKEV, 10 rrem 96 
READN,D trem 67 
IFN=-2THENL79 trem 209 
POKES1, (ABS(N) ) rrem 55 
FORT=1T0(ABS(D) ) rrem 155 
NEXTT trem 39 
POKES1,0 trem 164 
FORN=1T020:NEXTN trem 5 
GoTo9a rrem 57 
FORT=1T02000:NEXTT rrem 115 
GoTO210 :rem 161 


DATA-261,~-125,-261,-187,-201,-62,-215 
17256,-215,-258,-219,-250,-219,-250,- 
228,-375 srem 112 
DATA-223,-125,-215,-1000,-2 :rem 247 


POKE36879, 26:PRINT" {CLR} {BLK} {9 DOWN} 
"“TAB(6)"VIC FRENCH": PRINTTAB(7) "TUTOR 
TAL" rrem 78 
PRINTTAB(7)"k8 TJ" rrem 220 


PRINT"{7 DOWN}({RIGHT}DEFINING CHARACT 
ERS" trem 30 


X=PEEK(56)-2:POKE52,X: POKE56,X:POKE51 
»PEEK(55) :CLR trem 15 
CS=256*PEEK(52)+PEEK(51) trem 23 


FORI=CSTOCS+511:POKEI, PEEK(1+32768-CS 
) :NEXT zrem 166 
READX srem 15 
IFX=-1THEN376 trem 222 
IFX<@THEN2990 trem 177 
FORI=XTOX+7 : READJ trem 87 
IFJ<@THEN320 srem 159 
POKEL,J:NEXT srem 254 
GOTO290 srem 168 


PRINT" {CLR}{BLK}{16 DOWN}"SPC(5) "INST 
RUCTIONS?": PRINT: PRINTSPC(7)"{RED}Y 





{BLK}ES OR {RED}N{BLK}o" zrem 163 

GETAS : LFA$ <>"N"ANDA$<>"Y" THEN380 
rem 51 

IFA$="N"THENPOKE36869, 255:GOTO555 
zrem 167 


PRINT" {CLR} {BLK}{6 DOWN}IN ORDER TO C 
REATE", "FRENCH ACCENTS IN"," 
RAM, CERTAIN" 
PRINT"LETTERS HAVE BEEN", "RE-DEFINED 
{SPACE]}USING", "PROGRAMMABLE", "CHARACT 
ERS." trem 215 
COMPUTE!'s Gazette April 1984 





426 


436 


449 


450 


460 


476 


480 


498 


588 


510 


520 


538 


786 


728 


PRINT:PRINT"PRESS {RED}C{BLK} TO CONT 
INUE." srem 224 
GETAS : IFA$<>"C"THEN430 rrem 209 
PRINT" {CLR} {DOWN} {SLK}THE FRENCH CHAR 
ACTERS":PRINT"ARE {BLU}BLUE{BLK}, THE 
IR VIC"; trem 147 
PRINT"(3 SPACES}EQUIVALENTS {GRN]GREE 
N{BLK}. ":PRINT zrem 207 
POKE36869, 255 trem 161 
PRINTTAB(4)"{BLU}< {BLK}{RVS}= (GRN} 
«{OFF}"SPc(4)"{BLU}# {BLK}{RVS}= 
{GRN}#" rrem 69 
PRINT: PRINTTAB(4)"{BLU}$ (BLK}{RVS}= 
{SPACE} {GRN}${OFF}"SPC(4)"{BLU}% 
(BLK}{RVS}= [GRN}$" trem 155 
PRINT: PRINTTAB(4)"{BLU}& {BLK}{RVS}= 
{SPACE} (GRN}&{OFF}"SPC(4)"{BLU}+ 
{BLK} {RVS}= {GRN}+" zrem 172 
PRINT: PRINTTAB(4)"{BLU}£ {BLK} ({RVS]= 
(GRN}£(OFF}"SPC(4)"{BLU}@ {BLK} 
{Rvs}= [GRN}@" trem 58 
PRINT: PRINTTAB(4)"{BLU}* [BLK}{RVS}= 
{SPACE} (GRN)*{OFF}"SPC(4)"{BLU}T 
{BLK} {RVS}= [GRN}T" trem 19 
PRINT: PRINTTAB(4)"{BLU}[ {BLK}{RVS}= 
{SPACE} (GRNJ[{OFF}"SPC(4)"{BLU}] 
{BLK} {RVS}= {GRN}]" rrem 116 
PRINT: PRINTTAB(4)"{BLU}= {BLK} (RVS}= 
{SPACE} (GRN}=({OFF}"SPc(4)"{BLU}< 
{BLK} (RVS}= (GRN}<" trem 247 
PRINT: PRINTTAB(4)"{BLU}> {BLK} [{RVS]= 
{SPACE} {GRN}> {OFF} "spc(4)"{BLU}/ 
{BLK}{RVS}= [GRN}/" zrem 228 
PRINT: PRINT"{BLK}PRESS {RED}C{BLK} TO 
CONTINUE." em 115 
GETAS: IFA$<>"C"THEN550 zrem 215 
POKE36879, 237 rrem 167 
PRINT"{CLR}{8 DOWN}{2 RIGHT} {BLK]JONE 
{SPACE}MOMENT PLEASE." rrem 235 
PRINT: PRINTTAB(6)"UN MOMENT, ":PRINTTA 
B(3)"S'IL VOUS PLA]T.{WHT}" :rem 180 
POKE198, 5: POKE631, 78: POKE632, 69: POKEG 
33,87: POKE634,13:POKE635,131:END 











trem 27 
DATA7168,8,16,126,64,126,64,126,0 
rem 84 
DATA7168,8,16,126,64,126,64,126,0 
zrem 85 
DATA7384, 24, 36,9,60,66,66,68,9 
zrem 187 
DATA7392, 28, 34,64, 64,34, 28,8,16 
- zrem 253 
DATA7400,8,26,0,62,8,8,62,8 trem 25 


DATA7408,16,8,126,64,126,64,126,0 

trem 86 
DATA7416,38,48,72,78,72,48,30,0 

srem 231 
DATA7448,16,8,66,66,66,66,60,9 

rem 211 
DATA7456, 24, 36,9,66,66,66,68,0 

rem 199 
DATA7464, 36,0,60,66,66,66,60,0 

rrem 199 
DATA7472,30,46,72,126,72,72,78,0 

rem 44 
DATA7564,16,8,68,66,126,66,66,0 

rem 243 
DATA7564,16,8,68,66,126,66,66,8 

rrem 244 
DATA7512,24,36,0,68,66,126,66,9 

trem 232 


725 DATA7544,36,0,66,66,66,66,68,0 


zrem 263 
738 DATA7648,36,9,126,64,126,64,126,8 

zrem 85 
740 DATA7656, 24,36,126,64,126,64,126,8 

rem 139 
758 DATA7664, 20,0,62,8,8,8,62,8 srem 39 
768 DATA-1 srem 21 


Program 2: VIC French Tutor, 
Part 2: Vocabulary Drill And Translator 


1 POKE36879, 27:PRINT"(CLR}":L$="FRENCH":K 
$="ENGLISH":R$="(23 SPACES)": POKE36869, 


248 trem 37 
2 PRINT"{CLR} {BLU} (RVS}"R$"ENTER DESIRED 
(SPACE }NUMBER"RS$ trem 62 


3 PRINT:PRINT"(GRNJ1){BLK} "L$" TO "K$SPC 
(5) "VOCABULARY DRILL": PRINT: PRINT" {GRN} 
2) (BLK}"K$" TO "L$SPC(5) "VOCABULARY"; 

zrem 69 

4 PRINT" DRILL":PRINT:PRINT"(GRN}3) (BLK) 
"L$" TO "K$SPC(5) "TRANSLATOR": PRINT: PRI 
NT"(GRN}4) [BLK}"KS" TO "LSSPC(5) "TRANS 
LATOR" rrem 53 

5 PRINT:PRINT:PRINT"(3 RIGHT} {RVS}{CYN}PU 
SH (RED}RETURN(CYN} AFTER"SPC(5)" EACH 
{SPACE}WORD INPUT "SPC(5)" IN THIS PROG 


RAM {OFF}" rrem 159 
6 GETMQ$:IFVAL(MQ$) <LORVAL(MQ$ )>4THEN6 

zrem 114 

8 POKE36869, 255:ONVAL(MQ$)GOTO9, 18, 27,35 
zrem 66 
9 CO=0:SC=6:PRINT" {CLR} {BLK} {DOWN}HOW MAN 
Y WORDS?" rrem 165 
16 GETA$:IFVAL(A$)<1THEN1 rrem 5 
11 LETN=VAL (A$) :IFCO=NTHEN14 :rem 229 
12 PRINT" {CLR} {DOWN} {GRN} TRANSLATE": PRINT 
"INTO "KS; rrem 147 


13 PRINT" {HOME}{2 DOWN}{RED}"TAB(13)CO+1" 
{LEFT} OF"N:GOSUB43 
14 IFCO=NTHENGOSUB44:GOTO9 
15 PRINT" {HOME} {BLK}{5 DOWN}"WS;:INPUTTS 
zrem 39 
16 IFTS=E$THENSC=SC+1 : CO=CO+1 : PRINT" {BLU} 
CORRECT": FORL=1T01500:NEXTL:GOTO11 
rrem 25 
17 IFT$<>ESTHENCO=CO+1: PRINT" (BLU } WRONG! 
(SPACEJIT'S {PUR}";E$:FORT=1T01500:NEX 





TT:GOTO11 trem 91 
18 CO=@:SC=0:PRINT" {CLR} {BLK} [DOWN}HOW MA 
NY WORDS?" srem 213 


19 GETA$:IFVAL(A$)<1THEN19 rem 23 
20 LETN=VAL (A$) : IFCO=NTHEN23 rrem 229 
21 PRINT" {CLR} (DOWN) (GRN} TRANSLATE": PRINT 








"INTO "L$; rrem 148 

22 PRINT" (HOME}{2 DOWN} (RED}"TAB(13)CO+1" 

{LEFT} OF"N:GOSUB43 rrem 229 

23 IFCO=NTHENGOSUB44:GOTO18 trem 4 
24 PRINT" {HOME}{BLK}{5 DOWN}"E$;:INPUTTS 
srem 21 


25 IFT$=W$THENSC=SC+1:CO=CO+1:PRINT" {BLU} 
CORRECT"; FORL=1T01500 :NEXTL: GOTO20 
trem 43 
26 IFT$<>W$THENCO=CO+1:PRINT" {BLU }WRONG1! 
(SPACE}IT's {PUR}";W$:FORT=1T01586:NEX 
TT:GOTO26 rrem 127 
27 PRINT" {CLR} {DOWN}{BLKJENTER "L$" WORD 
{5 SPACES}OR {GRN}M{BLK} TO GO TO MENU 


i srem 137 
28 X$="XX":PRINT"(BLK}":INPUTTS :rem 244 
29 IFT$="M"THENRUN trem 166 


38 
31 


32 


33 
34 
35 


36 
37 
38 
39 


40 


41 
42 


43 


44 


45 


46 


47 


48 


49 


51 


52 


53 


54 


55 


56 


57 


58 


59 


66 


61 


62 


READES , W$ trem 143 
IFW$=TSTHENPRINT" {2 RIGHT}{BLU}"E$:FOR 
T=1T0150@:NEXTT: PRINT: RESTORE: GOTO27 


zsrem 255 
IFWS$=X$THENPRINT"{2 RIGHT}{BLU}TRY AGA 
IN.":RESTORE:GOTO28 trem 73 
IFE$ <>T$THEN3O trem 226 
PRINT" {BLU} (2 RIGHT]TRY AGAIN.":RESTOR 
E:GOTO28 trem 89 


PRINT"{CLR} {DOWN} {BLK}ENTER "K$" WORD 
{4 SPACESJOR (GRN}M{BLK} TO GO TO MENU 
" 


srem 135 
X$="XX":PRINT"({BLK]":INPUTTS :rem 243 
IFT$="M"THENRUN rrem 99 
READES$ ,W$ trem 151 


IFE$=TSTHENPRINT" {2 RIGHT} {BLU}"W$:FOR 
T=1T01580:NEXTT: PRINT: RESTORE: GOTO35 


rem 6 
IFE$=X$THENPRINT"({2 RIGHT}(BLU}TRY AGA 
IN. ":RESTORE: GOTO36 trem 53 
IFWS$ <>T$THEN38 trem 251 
PRINT"{BLU}{2 RIGHT) TRY AGAIN.":RESTOR 
E:GOTO36 trem 87 
X=INT (RND(1)*101)+1:RESTORE: FORM=1TOX: 
READES , W$ :NEXTM: RETURN trem 49 


PRINT; PRINT" ({CLR}({BLK}{4 DOWN}OUT OF"; 
N;"WORDS YOU {3 RIGHT}HAVE CORRECTLY"S 
PC(8)"TRANSLATED";SC;"{LEFT}.":rem 122 
PRINT:PRINT"YOUR SCORE IS"; INT((SC/N)* 
106) ;SPC(6)"PER CENT." rrem 41 
PRINT:PRINT"GO AGAIN?": PRINT" { DOWN} 

{2 RIGHT} (RED}Y{BLK} - YES":PRINT" 

{DOWN}{2 RIGHT}{RED]M {BLK}- RETURN TO 





MENU" rrem 228 
GETQ$: IFQ$<>"Y"ANDQ$<>"M"THEN47 :rem 2 
IFQ$="Y" THENRETURN rrem 89 
IFQ$="M"THENRUN trem 99 
DATASUMMER, @T@,APPLE, POMME, HERE, ICI, TH 
ERE, L*, NEST, NID rrem 165 


DATAHOUSE , MAISON, FARM, FERME , WHERE, 0#,S 
AME ,M=ME, BOX, BO]TE, FRENCH, FRAN£AIS,CA 
KE,G+TEAU trem 7 
DATACOW, VACHE, HORSE, CHEVAL, BIRD, OISEAU 
, CHRISTMAS, NO<L, EGG, «UF, EYE, «IL, WORK 

7 4UVRE srem 132 
DATACOST ,, COST, TASTE, GOST, RATHER, PLUT[LT 
, BELIEVE, CRO ]RE,HEAD, T=TE, BEAST , B=TE,K 
EY,CL@ srem 154 
DATANAME , NOM, YES, OUI, NO, NON, NOSE, NEZ,C 
OFFEE, CAF@, BOY ,GAR£0N, DAY, JOUR, CASTLE 
,CH+TEAU srem 217 
DATABLACK, NOIR, BLUE, BLEU, RED, ROUGE, GRE 
EN, VERT, WHITE, BLANC, PURPLE, VIOLET, YELL 
OW, JAUNE trem 144 
DATAFEBRUARY, F@VRIER, KNOT ,N4UD, TASK, T 
+CHE, PUPIL, @LTVE, PASTE, P+TE, FOREST, FOR 
=T,OR,OU rrem 160 
DATACHOIR, CH4UR, BONE, OS, BEAR, OURS,GOA 
T, CHTVRE, CITY, CIT@, NUT, NOIX,MOON, LUNE, 
BEEF, BUF rrem 148 
DATAFATHER, PTRE, MOTHER, MTRE, BABY, B@BG@, 
FAIRY, F@E, IRON, FER, FIRE, FEU, WINDOW, FEN 
=TRE zrem 48 
DATARULE, R(GLE, RICE, RIZ,CORN,MA>S,MAST 
ER, MA]TRE, WHEAT, BL@, VERY, TRTS, SOON, TLT. 
,» WINE, VIN :rem 37 
DATALIFE, VIE,JUNE, JUIN, TAIL, QUEUE, FOOT 
,PIED,ARM, BRAS, WORD,MOT, LEG, JAMBE, CHIL 
D, ENFANT rem 21 
DATASTRONG , FORT, BUILD, B+TIR, AT, *, SWORD 
, @P@E, FINGER, DOIGT, HEART, C4UR, SKY,CIE 
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L, BEAK, BEC rem 61 
63 DATAHOUSE,MAISON, DOOR, PORTE, SOAP, SAVON 
,CUT, COUP, LIP, LfVRE, SCHOOL, @COLE,SUN,S 
OLEIL rem 18 
64 DATAMILK,LAIT, TEA, TH@, WATER, EAU,ARROW, 
FLTCHE, END, FIN, AUNT, TANTE , TOOTH, DENT, X 
srem 79 


X,XX 
Program 3: 64 French Tutor 
108 DATA SUMMER, @T@,APPLE, POMME,HERE,ICI, 
THERE, L*,NEST,NID trem 208 
118 DATAHOUSE, MAISON, FARM, FERME , WHERE, O#, 
SAME, M=ME, BOX, BO]TE rrem 183 
126 DATAFRENCH, FRAN£AIS, CAKE, G+TEAU 
trem 252 
138 DATACOW, VACHE, HORSE, CHEVAL, BIRD, OISEA 
U, CHRISTMAS, NO<L trem 32 
148 DATAEGG, «UF, EYE,<IL,WORK, «UVRE 
trem 19 
158 DATACOST, COST, TASTE, GO$T, RATHER, PLUT[ 
T, BELIEVE, CROJRE rrem 68 
168 DATAHEAD, T=TE, BEAST, B=TE, KEY,CL@ 
trem 8 
176 DATANAME,NOM, YES, OUI,NO,NON,NOSE,NEZ, 
COFFEE, CAF@,BOY,GAR£ON trem 152 
188 DATA DAY,JOUR,CASTLE,CH+TEAU :rem 246 
196 DATABLACK, NOIR, BLUE, BLEU, RED, ROUGE,GR 
EEN, VERT,WHITE, BLANC trem 21 
200 DATAPURPLE, VIOLET, YELLOW, JAUNE:rem 42 
218 DATAFEBRUARY, F@VRIER, KNOT,N4UD, TASK, 


T+CHE, PUPIL, @LTVE trem 98 
228 DATAPASTE, P+TE, FOREST, FOR=T,OR, OU 
srem 171 
230 DATACHOIR, CH4UR, BONE, OS, BEAR, OURS, GO 
AT, CHTVRE rem 19 
248 DATACITY,CIT@,NUT,NOIX, MOON, LUNE, BEEF 
, BUF zrem 45 
258 DATAFATHER, PTRE, MOTHER, MTRE, BABY, B@B@ 
,PAIRY, FGE, IRON trem 193 
26 DATAFER, FIRE, FEU, WINDOW, FEN=TRE 
trem 30 
270 DATARULE,RTGLE,RICE,RIZ,CORN,MA>S,MAS 
TER, MA] TRE, WHEAT, BL@ rrem 81 
280 DATAVERY, TRtS, SOON, TT, WINE, VIN 
rrem 143 
298 DATALIFE, VIE, JUNE, JUIN, TAIL, QUEUE, FOO 
T, PIED, ARM, BRAS rrem 190 
380 DATAWORD, MOT, LEG, JAMBE, CHILD, ENFANT, 
trem 
310 DATASTRONG, FORT, BUILD, B+TIR,AT, *,SWOR 
D, @P@E, FINGER, DOIGT trem 179 
32@ DATAHEART ,C<UR, SKY,CIEL, BEAK, BEC 
trem 57 
330 DATAHOUSE, MAISON, DOOR, PORTE, SOAP, SAVO 
N,CUT,COUP, LIP, LTVRE trem 158 


34@ DATASCHOOL, @COLE,SUN,SOLEIL :rem 30 
358 DATAMILK,LAIT, TEA, TH@, WATER, EAU, ARROW 

,FLTCHE,END,FIN,AUNT,TANTE  :rem 180 
368 DATATOOTH, DENT, XX, XX rrem 80 
365 POKE53280,6 rrem 49 
376 POKE53281,12:CH=54272:FORT=CHTOCH+24: 

POKET,@:NEXT:PRINTCHR$(142) rem 159 


375 POKECH+24,15 rrem 124 
388 POKECH+5 ,17:POKECH+6 , 241: POKECH, 100 

trem 18 

390 PRINT"{CLR}{8 RIGHT}{6 DOWN}{BLK}"CHR 

$(122) trem 197 

400 FORT=1TO10 trem 65 


416 PRINTTAB(8)"{BLK}"CHR$(125)"{BLU} 


{RVS}{8 SPACES} {WHT}{8 SPACES}{RED} 
{8 SPACES)" zrem 214 
420 NEXT rrem 213 
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878 


880 


PRINTTAB(8)" {BLK} "CHR$ (125) trem 66 
PRINTTAB(8)"{BLK}"CHRS(125) | :rem 67 
FORT=OTO1STEP @ :READAS:IF A$ 
NT=1:READA$ 





NEXT 

READN,D 

IFD=-2THEN560 

POKECH+1, (ABS(N)) : POKECH+4,33:rem 137 
FORT=1TO(ABS(D)):NEXT trem 30 
POKECH+4, 32 trem 64 
FORN=1T020:NEXTN trem 6 
GOTO466 trem 107 
PRINTCHR$ (14) :GOTO590 srem 240 
DATA-16,-125,-16,-187,-16,-62,-22,-25 


®,-22,-250,-25,-250,-25,-250,-33,-375 
trem 230 
DATA~28,-93,-22,-375,-2,-2 trem 222 





PRINT" {CLR} {BLK} {11 DOWN}"TAB(15)"64 
{SPACE} FRENCH{DOWN}":PRINTTAB(15) "TUT 
ORIAL" rrem 93 
PRINTTAB(15)"8 TJ" trem 13 
PRINT"{3 DOWN}{3 RIGHT}PLEASE WAIT... 
DEFINING CHARACTERS" ~— trem 19 
PRINT: PRINT trem 235 
X=48: POKE56,X trem 241 
cs=12288 rrem 113 
POKE56334, PEEK(56334)AND254:POKE1, PEE 
K(1)AND251 rrem 187 
FORI=CSTOCS+4095 : POKEI , PEEK(I+40968) : 
NEXT rrem 24 
READX trem 16 
IFX=-1THEN749 srem 233 
IFX<OTHEN668 rrem 188 
FORI=XTOX+7 : READJ rrem 97 
IFJ<OTHEN696 trem 17 
POKEI+5120,J:NEXT rrem 242 
POKE1, PEEK(1)OR4:POKE56334, PEEK(56334 
)OR1 rrem 136 
GOTO668 trem 111 
PRINT" {CLR} {BLK} {1@ DOWN}"SPC(13) "INS 
TRUCTIONS? {DOWN} ":PRINTSPC(15)"{RVS}Y 
{OFFJES oR {RVS}N{OFF}O" srem 188. 
GETAS : IFA$<>"N"ANDAS <> "Y"THEN750 

srem 53 
IFA$="N"THEN1150 rrem 86 


PRINT" {CLR} {BLK}{6 DOWN}{2 RIGHT}IN O 
RDER TO CREATE FRENCH ACCENTS IN 

{pown}" trem 123 
PRINT" {8 RIGHT}THIS PROGRAM, CERTAIN 
{Down} " rrem 235 
PRINT"(2 RIGHT}LETTERS HAVE BEEN RE-D 
EFINED USING{DOWN}" :rem 86 
PRINT"{8 RIGHT}PROGRAMMABLE CHARACTER 
s.{Down}" rem 233 
PRINT"{10 RIGHT}{5 DOWN]PRESS [RVS}C 
{OFF} TO CONTINUE." = trem 139 
GETAS : IPA$ <> "C"THEN8 20 :rem 215 


PRINT" (CLR}{DOWN}{4 RIGHT}(BLK}THE FR 
ENCH CHARACTERS ARE BLACK,"  :rem 236 
PRINT"({4 RIGHT}THEIR 64 EQUIVALENTS A 
RE {WHT}WHITE{BLK}.{2 DOWN}" :rem 86 
POKE53272, 29 rrem 102 
PRINTTAB(12)"4 (RVS}=(OFF} {RVS} 

{WHT} «(OFF} {BLK}"SPc(4)"# {RVS}= 

{orr} {RVS}{WHT}#{OFF}{BLK}" :rem 225 
PRINT: PRINTTAB(12)"$ (RVS}=(OFF} 

{RVs} {WHT}S${OFF}{BLK}"sPc(4)"% [RVS}= 
{OFF} {RVS}(WHT}3{OFF}{BLK}" :rem 55 
PRINT: PRINTTAB(12)"& {RVS}={OFF} 

{RVS} {WHT} & {OFF} ({BLK}"SPc(4)"+ [RVS}= 
{OFF} (RVS}(WHT}+{OFF}{BLK}" :rem 72 





898 


980 


910 


929 


938 


948 


958 
952 


955 
968 
965 
970 
975 
980 
985 
998 


995 


1988 
1005 
1018 
1615 
1028 
1025 
1038 
1635 
1648 
1156 
1166 
1165 
1178 
1186 


1198 


1266 


1216 
1220 
1225 


1238 


PRINT: PRINTTAB(12)"£ {RVS}=(OFF} 
{RVS} (WHT }£{OFF}{BLK}"sPc(4)"@ (RVS} 
=(OFF} {RVS}(WHT}@{OFF}(BLK}":rem 223 
PRINT: PRINTTAB(12)"* {RVS}={OFF} 
{RvS} (WHT}* {OFF} {BLK}"sPpc(4)"t [{RVS}= 
{orF} (RVS}{wHT}T(OFF}(BLK}" :rem 175 
PRINT: PRINTTAB(12)"[_ {RVS}=(OFF} 
{Rvs} (WHT) [ {OFF} {BLK}"sPc(4)"] (RVS}= 
{OFF} (RVS}(WHT)]{OFF]{BLK}" :rem 16 
PRINT: PRINTTAB(12)"= {RVS}={OFF} 
{RVS} (WHT}={OFF}(BLK}"sPc(4)"< [RVS}= 
{OFF} {RVS}{wHT}<{OFF}{BLK}" :rem 147 
PRINT: PRINTTAB(12)"> {RVS]={OFF} 
{RVS} {WHT}>{OFF}{BLK}"spc(4)"/ (RVS}= 
{orF} (RVS}{wHT)}/{OFF}{BLK}" :rem 124 
PRINTTAB(9)"{2 DOWN}{BLK}PRESS {RVS]C 
{OFF} TO CONTINUE." trem 43 
GETA$: IFA$<>"C"THEN959 zrem 223 
DATA7168,8,16,126,64,126,64,126,0 
srem 94 
DATA7168,8,16,126,64,126,64,126,9 
:rem 97 
DATA7384, 24, 36,0,60,66,66,60,0 
trem 194 
DATA7392, 28, 34,64, 64,34, 28,8,16:rem 8 
DATA7490,8,20,0,62,8,8,62,0 :rem 31 
DATA7408,16,8,126,64,126,64,126,0 
rem 96 
DATA7416, 30, 40,72, 78, 72,40, 38,8 
trem 
DATA7448,16,8,66,66,66,66,60,0 
3rem 
DATA7456, 24, 36,9,66,66,66,69,0 
trem 
DATA7464, 36,0, 60,66, 66,66,60,9 
zrem 287 
DATA7472, 30,40, 72,126,72,72, 78,8 
trem 73 
DATA7504,16,8,60,66,126,66,66,0 
srem 34 
DATA7504,16,8,60,66,126,66,66,0 
trem 39 
DATA7512,24,36,9,68,66,126,66,0 
trem 22 
DATA7544, 36,0, 66,66, 66,66, 60,0 
trem 248 
DATA7648, 36,0,126,64,126,64,126,0 
trem 131 
DATA7656, 24, 36,126,64,126,64,126,8 
rrem 188 
srem 84 





236 
2298 
293 


DATA7664, 20,0,62,8,8,8,62,0 
DATA-1 rrem 61 
POKE53272, 29:CLR: RESTORE rrem 9 
PRINT" {CLR}":L$="FRENCH":K$="ENGLISH 
Ma rem 65 
R$="(23 SPACES)" rrem 196 
POKE53280,7 zrem 93 
PRINT" {CLR} {DOWN} {WHT} {RVS}"SPC(16)" 
ENTER DESIRED NUMBER" zrem 121 
PRINT"{2 DOWN}{WHT}1){BLK} "L$" TO " 
KS" {WHT}-{BLK} VOCABULARY DRILL" 
zrem 232 
PRINT"(2 DOWN}(WHT}2) (BLK}"K$" TO " 
L$" {WHT}-{BLK} VOCABULARY DRILL" 
rrem 225 
PRINT"(2 DOWN}{WHT}3) [BLK}"L$" TO " 
KS" {WHT}-{BLK} TRANSLATOR" :rem 126 
PRINT"({2 DOWN}{WHT}4) {BLK 
L$" {WHT}-{BLK} TRANSLATOR" 
PRINT"{2 DOWN}{WHT}5) ([BLKJEND THE P 
ROGRAM" zrem 128 
PRINT"{4 DOWN}(3 RIGHT} (RVS) {WHT} PUS 











1246 
1258 


1255 
1268 


1276 
1280 
1298 
1386 
1310 


1320 
1338 


1348 


1345 
1358 


1366 


1378 
1388 
1398 
1498 


1416 
1426 


1438 


1435 
1448 


1458 


1468 
1476 


1486 
1498 


1566 


1518 
1526 


1538 


1546 


1558 
1568 
1576 


H {BLK]RETURN(WHT} AFTER EACH WORD I 
NPUT{DOWN}"; rrem 153 
PRINTSPC(16)"IN THIS PROGRAM":rem 29 
GETMQS$ : IFVAL(MQ$) <1ORVAL(MQ$ ) > 5THEN1 
258 trem 151 
IFVAL (MQ$ )=5THENSYS2048 trem 192 
POKE53272,29:ONVAL(MQ$ )GOTO1270,1360 
1 1458,1538 zrem 67 
CO=0:SC=0:PRINT" {CLR} {BLK}{2 DOWN} 
{3 RIGHT}HOW MANY WORDS?" :rem 158 
GETA$:IFVAL(A$)<1THEN1286 rem 217 
LETN=VAL(A$) :IFCO=NTHEN1328 :rem 176 
PRINT"{CLR}{4 DOWN){3 RIGHT} TRANSLAT 
E":PRINT"(3 RIGHT}INTO "K$ :rem 124 
PRINT"{2 UP}"TAB(24)CO+1"{LEFT} OF"N 
:GOSUB1619 rrem 122 
IFCO=NTHENGOSUB1629:GOTO1278 :rem 39 
PRINT"{3 DOWN}{7 RIGHT} "WS; :INPUTTS 
rem 142 
IFT$=E$THENSC=SC+1:CO=CO+1:PRINT" 
{7 RIGHT}{2 DOWN} {WHT}CORRECT | {BLK} 
":FORL=1TO2E2:NEXTL srem 12 
IFTS$=ES$THENT$="":GOTO1299 :rem 225 
CO=CO+1:PRINT"({7 RIGHT}(2 DOWN) (WHT) 
WRONG 1{2 SPACES}IT'S [BLK}";E$:FORT 
=1T0158:NEXTT:GOTO1290 rrem 212 
CO=9:SC=9:PRINT"{CLR}{2 DOWN} 
{3 RIGHT}{BLK}HOW MANY WORDS?" 


trem 158 
GETA$ : IFVAL(A$) <1THEN1370 trem 217 
LETN=VAL(A$):IFCO=NTHEN1416 :rem 176 


PRINT"({CLR}{4 DOWN}(3 RIGHT}TRANSLAT 
E":PRINT"{3 RIGHTJINTO "L$; :rem 193 
PRINT" {UP} "TAB(24)CO+1"{LEFT} OF"N:G 
OSUB1619 rrem 233 
IFCO=NTHENGOSUB1620:GOTO136@ :rem 39 
PRINT"{3 DOWN})(7 RIGHT}"E$;:INPUTTS 
trem 124 
IFT$=W$THENSC=SC+1 : CO=CO+1 : PRINT" 
{wHT}{2 DOWN}{7 RIGHT}CORRECT 1{(BLK} 
“:FORL=1T01500:NEXTL trem 59 
IFT$=WSTHEN1386 :rem 135 
CO=CO+1:PRINT"(WHT}{2 DOWN}{7 RIGHT} 
WRONG ! IT'S (BLK}";W$:FORT=1T01590: 
NEXTT: GOTO1389 rrem 238 
PRINT" {CLR} {DOWN} {RIGHT} {BLKJENTER " 


L$" WORD OR {RVS}M{OFF} TO GO TO MEN 

* trem 253 
X$="XX": PRINT" {DOWN} {RIGHT}"; : INPUTT 
$ srem 46 
IPT$="M"THEN1166 rrem 152 
READES$ , WS rrem 249 


IFW$=TSTHENPRINT"{DOWN}{2 RIGHT}"E$: 
FORT=1T01500:NEXTT: PRINT: RESTORE: GOT 
01450 rrem 188 
IFW$=X$THENPRINT" {DOWN} (2 RIGHT} TRY 
(SPACE JAGAIN. ": RESTORE: GOTO1469 

rem 253 
IFE$<>T$THEN1480 :rem 173 
PRINT" (DOWN}{2 RIGHT}TRY AGAIN.":RES 
TORE:GOTO1460 rrem 13 


PRINT" {CLR} {DOWN} {RIGHT}{BLKJENTER " 





K$" WORD OR [RVS}M{OFF} TO GO TO MEN 

be zrem 251 
X$="XX": PRINT" {DOWN} {RIGHT }"; : INPUTT 
$ trem 45 
IFT$="M"THEN117@ ‘em 152 
READES , WS rrem 248 


IFES$=T$THENPRINT"{DOWN]}{2 RIGHT}"WS: 
FORT=1T01590:NEXTT: PRINT : RESTORE: GOT 
01530 trem 186 
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1580 IFE$=X$THENPRINT"{DOWN}{2 RIGHT}TRY 
{SPACE}AGAIN.":RESTORE:GOTO1549 


rrem 242 

1590 LFW$<>TSTHEN1L560 rrem 198 
1688 PRINT" {DOWN}{2 RIGHT}TRY AGAIN.":RES 
TORE:GOTO1546 trem 11 

1610 X=INT(RND(1)*101)+1:RESTORE: FORM=1TO 
X:READES , W$ :NEXTM: RETURN trem 146 


1628 PRINT: PRINT" {CLR}{BLK}{4 DOWN} 
{3 RIGHT}JOUT OF";N;"WORDS, YOU HAVE 


{ SPACE] CORRECTLY" trem 71 
1625 PRINT"({12 RIGHT}TRANSLATED";SC;" 
{LEFT}." trem 8 


1630 PRINT:PRINT"(6 RIGHT}YOUR SCORE IS"; 
INT((SC/N)*100);"PER CENT." zrem 203 

1648 PRINTTAB(15)"{2 DOWN}GO AGAIN?" 
trem 129 
1645 PRINT" {DOWN}"TAB(16)"{RVS}Y{OFF} - Y¥ 
ES": PRINT" {DOWN} "TAB(11)"{RVS}M{OFF} 


- RETURN TO MENU" rrem 96 
1650 GETQ$: IFQ$<>"Y"ANDQ$<>"M"THEN1650 
trem 196 
1660 IFQ$="Y"THENRETURN trem 186 
1676 IFQ$="M"THEN1176 trem 152 


Making Calendars 


(Article on page 67.) 





BEFORE TYPING.. 


Before typing in programs, please refer to “How 
To Type COMPUTE"'s Gazette Programs,” “A 
Beginn inner’s Guide To Typing In Programs,” and 
e Automatic Proofreader’ that appear before 
the Program Listings. 








Program I: Monthly Screen Calendar 
80 DIMM$ (12) :FORT=1T012:READM$ (I) :NEXTI 


srem 184 
98 SYS65517:A=PEEK(781) : IFA=4@THENPOKE532 
81,1 trem 167 


168 PRINT"{CLR}{3 DOWN}{2 RIGHT}THIS IS A 
PROGRAM":PRINT"{6 RIGHT}TO SHOW A" 
trem 189 
195 PRINT"(3 RIGHT) (PUR}MONTHLY CALENDAR 
{BLU}":PRINT"(4 RIGHTJON THE SCREEN" 
trem 155 
110 PRINT"{2 DOWN}(2 RIGHT]PLEASE TYPE IN 
THE":PRINT"{3 RIGHT} {RED }MONTH(BLU} 
{SPACEJAND {RED}YEAR{BLU}"  :rem 149 
111 PRINT"{RIGHT}THAT YOU WISH TO SEE":PR 
INT" (DOWN}{2 RIGHT}(EXAMPLE: (RED}12, 
1983{BLU}){PUR}{2 DowN}" trem 188 
136 PRINT"(5 RIGHT}";:INPUTMO,Y:PRINT" 
{2 DOWN}{S RIGHT}{PUR}THANK YOU! [(BLU} 
{DOWN} ":FORI=1T0800:NEXT rrem 167 
292 IFM@=10RMO=30RMO=50RMO=70RMO=8ORMO=10 
ORM@=12THENE1=31 rrem 26 
293 IFM@=40RM@=60RMO=90RMO=11THENE1=30 
rrem 66 
294 IFM@=2ANDY/4<>INT(¥/4) THENE1=28 
trem 163 
295 IFMO=2ANDY/4=INT(Y/4)THENGOSUB14008 
trem 83 
297 PRINT" {CLR} {DOWN} (RIGHT) {RED}";M$(M@) 
7 7"{BLU}" trem 123 
298 GOSUB135@:1FA=40THENPRINT trem 83 
308 PRINT" {2 RIGHT}{RED}S{BLU}{2 RIGHT]M 
{2 RIGHT}T{2 RIGHT}wW{2 RIGHT)T 
{2 RIGHT}F(2 RIGHT}s" zrem 169 
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GOSUB1368 trem 226 
D=1:GOSUB1059 :rem 198 
IFD1=7THENFORI=1T019: PRINT" {RIGHT}";: 
NEXT: PRINTD:I1FA=48THENPRINT  :rem 53 
IFD1=7THEN330 trem 211 
IFD1=6THENFORI=1T016: PRINT" {RIGHT} "7; 
NEXT: PRINTD; :GOTO330 trem 16 
IFD1=5THENFORI=1T013: PRINT" {RIGHT}";+ 
NEXT: PRINTD; :GOTO330 trem 13 
IFD1=4THENFORI=1T010: PRINT" {RIGHT }";: 
NEXT: PRINTD; :GOTO330 rrem 18 
IFD1=3THENFORI=1T07 : PRINT" {RIGHT }"; :N 
EXT: PRINTD; :GOTO330 rrem 224 
RED ea THENE ORT ro ema Ga nl 7th 
EXT: PRINTD; :GOTO330 em 221 
TEDL =1THENPRINT" {RIGHT} {RED} ";D7" 

{BLU}"; :GOTO330 rrem 168 
FORD=2TOE1:GOSUB1958 em 201 
TPD1=1ANDD ¢=9THENPRINT" (RIGHT) (RED) "7 


D;"{BLU}"; :GOTO345 rem 114 





IFD1=1ANDD>9THENPRINT"(RED}";D;"{BLU} 
";2GOTO345 trem 27 
IFD1=7THEN348 trem 215 
IFD<=9THENPRINTD; :GOTO345 rrem 105 






PRINT" {LEFT} ";D;:GOTO345 trem 2108 


IFD> 9THENPRINT" {LEFT} ";D:GOTO345 
trem 12 
PRINTD trem 105 
IFA=4QANDD1=7THENPRINT srem 133 
NEXTD rrem 32 
PRINT: PRINT: FL=1: GOSUB135@:1FA=22THE 
NPRINT"{3 UP)" trem 57 
END trem 165 
IFMO=1THENM9=13 :¥=Y-1:GOTO1680 
rrem 80 
IFM@=2THENMG=14: Y=Y-1 rrem 23 
M=M@-2 rrem 47 
D1=INT(2.6*M-@.2)+D+¥-19GG+INT( (¥-19 
90) /4) rrem 207 
D1=D1+INT(19/4)-2*19 trem 21 
D1=D1-INT(D1/7)*7+1 trem 235 
IFMO=40RMO=9THEND1=D1+1 srem 135 
IFM@=13THENMO=1:Y=Y+1:GOTO1245 
trem 81 
IFM@=14THENM@=2: Y=Y+1:D1=D1+1 
:rem 210 
IFD1=8THEND1=1 trem 86 
IF (Y=210GANDMO>=3)OR(Y>2100)THEND1=D 
1-1: IFD1=@THEND1=7 rrem 198 
IF (¥=220GANDMG>=3 )OR(Y>2200)THEND1=D 
1-1: IFD1=@THEND1=7 rrem 202 
IF (¥=230@ANDM@>=3 )OR(Y>2300)THEND1=D 
1-1: IFD1=@THEND1=7 rrem 206 
RETURN trem 168 
IFFL=OTHENPRINT : FORI=1 7022: PRINT" *"; 
:NEXT: PRINT: RETURN :rem 188 


IFD1=7THENPRINT"(3 UP)":FORI=1T022:P 

RINT"*"; :NEXT: PRINT" {UP}":RETURN 
trem 119 

FORI=1T022:PRINT"*"; :NEXT: PRINT" {UP} 

"RETURN rrem 21 

PRINT"{2 SPACESJET9(2 SPACES)RTQ 

{2 SPACES} T9(2 SPACES}£T] 

{2 spAcEs}—T9(2 SPACES} ET 





{2 SPACES} §TJ":RETURN rrem 42 

IF(¥/160=INT(Y¥/10) )AND(¥/400<>INT(Y 
/400) )THENE1=28:GOTO1416 trem 231 
E1=29 rrem 232 
RETURN trem 166 


DATA"{3 SPACES}JANUARY","{3 SPACES}F 
EBRUARY","{4 SPACES)MARCH"," 
{4 SPACES}APRIL" trem 216 


1436 DATA"{5 SPACES}MAY","{5 SPACES }JUNE" 
,"{5 SPACES)JULY","{4 SPACES }AUGUST" 
zrem 172 

1449 DATA"(2 SPACES}SEPTEMBER"," 
{3 SPACES}OCTOBER","{3 SPACES }NOVEMB 
ER", "{3 SPACES}DECEMBER" trem 193 


Program 2: 
Monthly Calendar For Printer 


1 GoTO1s trem 283 
5 El=1:E2=1:E3=1:E4=1:E5=1:E6=1:E7=1 

rem 226 
6 GOSUB1109:D8=D7-1:RETURN srem 163 


16 OPEN1,4:SYS65517:A=PEEK(781) :IFA=40THE 
NPOKE53281,1 rem 156 
28 GOSUB4860 :GOSUB3200: PRINT#1, rem 176 
38 ONMOGOSUB3G16, 3620, 3830, 3048, 3050, 3060 
, 3078, 3088, 3098,3108,3118,3128 :rem 56 
40 PRINT#1,"":PRINT#1,"":GOSUB1619:GOSUBL 





650:GOSUB16698 rem 267 
88 OND9GOSUB1811,1821, nese 1841,1851,1861 
71871 srem 172 
99 PRINT#1,""sPRINT#1, "" trem 78 
166 G1l=D8 zsrem 194 
165 G=G1:GOSUB1726:D1=D:E1=E srem 126 

118 G2=G+1:G=G2:GOSUB1720:D2=D:E2=E 
srem 16 

115 G3=G+1:G=G3:GOSUB1726:D3=D:E3=E 
zrem 19 

128 G4=G+1:G=G4:GOSUB1726:D4=D:E4=E 
rem 19 

125 G5=G+1:G=G5:GOSUB1726:D5=D:E5=E 
trem 28 

138 G6=G+1:G=G6:GOSUB1729:D6=D:E6=E 
srem 28 

135 G7=G+1:G=G7:GOSUB1726:D7=D:E7=E 
zrem 37 
146 G1=G7+1:GOSUB1169:PRINT#1,"":PRINT#1, 
“";ITPG1<=sE9THENI@5 srem 188 
155 PRINT#1,"" rem 236 
1868 GOTO5008 zrem 191 

1169 GOSUB2666:X=E1:X1=D1:GOSUB11999 
srem 115 
1126 X=E2:X1=D2:GOSUB11900 zsrem 242 


1136 X=E3:X1=D. }OSUB1100B rem 245 
1148 X=E4:X1=D. OSUB11986 rem 248 
1150 X=E5:X1=D: OSUB11008 zrem 251 
1168 X=E6:X1=D6:GOSUB11900 rem 254 
1178 XsE7:X1=D7:FL=1:GOSUB11008 trem 59 
1269 GOSUB28608:X=E1:X1=D1:GOSUB12600 











srem 117 
1226 X=E2:X1 jOSUB12888 zrem 244 
1230 X=E3:X1= ;OSUB1 2086 srem 247 
1248 X=E4:X1=D4:GOSUB12000 srem 250 
1258 X=E5:X1=D5:GOSUB12000 trem 253 
1268 X=E6:X1=D6:GOSUB12000 srem @ 


1270 X=E7:X1=D7:FL=1:GOSUB12000 srem 61 
1309 GOSUB2600:X=E1:X1=D1:GOSUB13000 


trem 119 
1320 X=E2:X1=D2:GOSUB13960 srem 246 
1338 X=E3:X1=D3:GOSUB13009 srem 249 
1348 X=E4:X1=D4:GOSUB13600 srem 252 
1350 X=E5:X1=D5:GOSUB13000 trem 255 
1360 X=E6:X1=D6:GOSUB13000 srem 2 


1370 X=E7:X1=D7:FL=1:GOSUB13000 srem 63 
1499 GOSUB2000:X=E1:X1=D1:GOSUB14000 


trem 121 
14280 X=E2:X1=D2:GOSUB14608 trem 248 
1430 X=E3:X1=D3:GOSUB14990 srem 251 
1449 X=E4:X1=D4:GOSUB14600 trem 254 
1456 X=E5:X1=D5:GOSUB14000 srem 1 
1468 X=E6:X1=D6:GOSUB14686 srem 4 


1476 X=E7:X1=D7:FL=1:GOSUB14989 zrem 65 


1569 
1528 
1536 
1548 
1556 
1568 
1578 
1608 
16106 
1611 
1612 
1613 
1614 
1615 
1616 


1626 


1621 
1622 
1623 
1624 
1625 
1626 
1658 
1652 
1654 
1656 


1658 
1668 


1665 
1678 
1675 


1688 
1685 
1698 
1695 


1766 


1765 
1716 


1711 
1712 


1715 
1726 
1722 
1726 
1728 


GOSUB2006 :X=E1:X1=D1:GOSUB15900 


rem 123 
X=E2:X1=D2:GOSUB15968 zrem 250 
X=E3:X1=D3:GOSUB15808 rem 253 
X=E4:X1=D4:GOSUB15866 trem 6 
X=E5:X1=D5:GOSUB150006 srem 3 
X=E6: X1=D6:GOSUB15806 srem 6 
X=sE7:X1=D7:FL=1:GOSUB15000 rem 67 
RETURN rem 167 


PRINT#1,"{5 SPACES}";:PRINT#1,CHRS$(1 
4) "SUN"; :PRINT#1, CHRS$(15)"{5 SPACES} 





? srem 69 
PRINT#1,CHR$ (14) "MON"; : PRINT#1 , CHRS ( 
15)"{5 SPACES}"; rrem 116 
PRINT#1,CHR$ (14) "TUE"; : PRINT#1,CHR$( 
15)"({5 SPACES)"; rrem 121 
PRINT#1,CHR$ (14) "WED"; : PRINT#1, CHRS ( 
15)"{5 SPACES}"; trem 108 
PRINT#1,CHR$(14) "THU"; : PRINT#1,CHR$ ( 
15)"(5 SPACES}"; rrem 126 
PRINT#1,CHRS$(14) "FRI"; : PRINT#1,CHRS$( 
15)"(5 SPACES}"; trem 111 
PRINT#1,CHR$(14) "SAT": PRINT#1,CHRS$(1 
5)" rrem 1 


PRINT#1,"{5 SPACES}";:PRINT#1,CHR$(1 















4)"---";:PRINT#1,CHR$(15)"{5 SPACES} 
a trem 215 
PRINT#1,CHR$(14)"---"; : PRINT#1,CHR$( 
15)"{5 SPACES}"; zrem 18 
PRINT#1,CHR$(14)"---"; : PRINT#1,CHRS ( 
15)"{5 SPACES}" trem 19 
PRINT#1,CHRS$(14)"---"; : PRINT#1,CHRS( 
15)"{5 SPACES}" trem 28 
PRINT#1,CHR$(14) "---"; : PRINT#1,CHR$ ( 
15)"{5 SPACES}"; trem 21 
PRINT#1,CHR$ (14) "---"; : PRINT#1,CHR$( 
15)"{5 SPACES}" rrem 22 
PRINT#1,CHR$(14)"---": PRINT#1,CHR$(1 
5)" ":RETURN trem 187 
IFM@=10RM@=30RMG=50RMO=70RMG=8ORMO=1 
GORMO=12THENES=31 trem 81 
IFM@=40RM@=6ORM9=90RMG=11THENE9=30 

zrem 122 
IFM@=2ANDY /4<>INT(Y/4)THENE9=28 

trem 160 
IFMO=2ANDY/4=INT(Y/4) THENE9=29 

trem 162 
RETURN rrem 186 
IFMO=1 THENM@=13 : Y=Y-1:GOTO1670 

srem 92 
IFMO=2THENMO=14: Y=Y-1 trem 34 
M=Mg-2 trem 52 
D9=INT(2.6*M-8.2)+D+¥-1900+INT((Y-19 
@8)/4) trem 232 
D9=D9+INT(19/4)-2*19 rrem 45 
D9=D9-INT(D9/7)*7+1 trem 20 
IFM@=4ORMO=9THEND9=D9+1 rrem 163 
IFM@=13THENMO=1 : Y=Y+1:GOTO1716 

rem 93 
IFM@=14THENM@=2 : Y=Y+1 :D9=D9+1 

trem 227 
IFD9=8THEND9=1 rrem 104 
IF (Y=21@0ANDM@>=3 )OR(¥> 2100) THEND9=D 
9-1: IFD9=@THEND9=7 trem 227 


IF (Y=220G0ANDMG>=3 )OR(Y> 2200) THEND9=D 
9-1: IFD9=OTHEND9=7 rem 230 





IF (Y=230GANDMO )OR(Y> 2380) THEND9=D 
9-1: IFD9=@THEND9=7 srem 233 
RETURN srem 174 
IFG>E9THENGOTO1749 :rem 144 
IFG<1@6THENGOTO1742 trem 117 


IFG>=16ANDG<2@THENGOTO1746 :rem 116 
IFG>=20ANDG<3@THENGOTO1748 :rem 122 
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1736 
1748 
1742 
1746 
1748 
17508 
1755 
1811 
1821 
1831 
1841 
1851 
1861 
1871 
2080 
2001 
2082 
2063 
2004 


2085 
2011 


2012 
2613 
2014, 
2015 


2621 
2622 


2623 
2624 
2625 
2031 
2032 


2033 
2034 


2035 
2041 


2042 
2043 


2044 
2045 


2051 
2052 


2053 
2054 


2055 
2061 
2062 


IFG>=390THENGOTO175@ trem 180 
D=1:E=1:GOTO1755 trem 176 
D=G+2:E=1:GOTO1755 rem 37 
D=G-16+2:E=2:GOTO1755 zrem 184 
D=G-26+2 :E=3:GOTO1755 trem 188 
D=G-30+2:E=4 trem 114 
RETURN trem 178 


D1=1:D2=3:D3=4:D4=5 :D5=6:D6=7:D7=8:G 
OSUBS : RETURN trem 149 
Dl=1:D2=1:D3=3:D4=4:D5=5 :D6=6:D7=7:G 
OSUBS : RETURN trem 143 
Dl=1:D2=1:D3=1:D4=3:D5=4:D6=5:D7=6:G 
OSUBS : RETURN trem 138 
Dl=1:D2=1:D3=1:D4=1:D5=3:D6=4:D7=5:G 
OSUBS : RETURN rrem 134 
Dl=1:D2=1:D3=1:D4=1:D5=1:D6=3:D7=4:G 
OSUB5 : RETURN trem 131 
Dl=1:D2=1:D3=1:D4=1:D5=1:D6=1:D7=3:G 
OSUB5: RETURN rrem 129 
D1=3:D2=4:D3=5 :D4=6 :D5=7:D6=8:D7=9:G 
OSUB5 : RETURN trem 163 
PRINT#1,"{4 SPACES)";:RETURN:rem 104 
PRINT#1," —2 +9 ";:RETURN :rem 181 
PRINT#1,"E+9[2 SPACES)§+]";:RETU 

RN 








trem 182 
PRINT#1,"B+9{2 SPACES} +9"; :RETU 
RN trem 183 
PRINTHL,"E+9(2 SPACES }§+9"; :RETU 
rrem 184 
PRINT#1, * £2 +3 ";:RETURN :rem 185 
PRINT#1," &+9{2 SPACES}"; :RETURN 
zrem 16 
PRINT#1," £+9{2 SPACES)"; :RETURN 
trem 17 
PRINT#1," &+]{2 SPACES}"; : RETURN 
z:rem 18 
PRINT#1," &+3{2 SPACES}";:RETURN 
zsrem 19 
PRINT#1," &+9{2 SPACES}";:RETURN 
zrem 20 
PRINT#1," &2 +9 ";:RETURN :rem 183 
PRINT#1,"§+J(2 SPACES} +9"; :RETU 
RN trem 184 
PRINT#1,"(2 SPACES}£+] ";:RETURN 
:rem 19 
PRINT#1," &+9{2 SPACES)"; :RETURN 
trem 26 
PRINT#1,"E4 +3"; :RETURN :rem 7 
PRINT#1,"§3 +3 ";:RETURN :rem 94 
PRINT#1,"(3 SPACES) +3"; :RETURN 
rrem 19 
PRINT#1," £2 +3 ";:RETURN :rem 186 
PRINT#1,"{3 SPACES}£+3"; :RETURN 
zrem 21 
PRINT#1,"R3 +] ";:RETURN  :rem 98 


PRINT#1,"(2 SPACES}R+9 ";:RETURN 

srem 19 
";sRETURN :rem 186 
"; RETURN 


PRINT#1," 82 +9 
PRINT#1,"R+9 E+] 


rrem 187 
PRINT#1,"E4 +9"; : RETURN :rem 8 
PRINT#1,"(2 SPACES}§+9 ";sRETURN 

trem 23 
PRINT#1,"R4 +9"; :RETURN trem 6 


PRINT#1,"R+9(3 SPACES)"; :RETURN 





trem 21 
PRINT#1,"R3 +3 ";2RETURN trem 98 
PRINT#1,"(3 SPACES}&+]9"; : RETURN 

srem 23 
BRIE ace a ";sRETURN :rem 100 
PRINT#1, 2 +9 ";:RETURN :rem 187 


PRINEFL AMESaa SPACES)"; :RETURN 
trem 22 
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2063 
2064 


2065 
2071 
20672 
2073 
2074 
2875 


2681 
2082 


2083 
20684 


2085 


2091 
2092 


2693 
2094 


2895 
2111 


2112 
2113 
2114 
2115 


3019 


3811 


3812 


3613 


3014 


3615 


3628 


3821 


3822 
3623 
3024 
3625 


3638 


3631 


PRINT#1,"£3 +] ";:RETURN  :rem 99 
PRINT#1,"E£+}{2 SPACES} §+]"; :RETU 
RN trem 196 
PRINT#1," §2 +} ";:RETURN :rem 191 
PRINT#1,"R4 +3"; :RETURN trem 8 
PRINT#1,"{3 SPACES} &+3";:RETURN 
srem 23 
PRINT#1,"{2 SPACES}R+9 ";:RETURN 
rrem 24~ 
PRINT#1," £+]9(2 SPACES}";:RETURN 
srem 25 
7 tRETURN 
srem 26 
PRINT#1," §2 +9 ";:RETURN :rem 189 
PRINT#1,"8+9(2 SPACES)£+9";:RETU 


PRINT#1," &+39{2 SPACES}" 






RN trem 196 
PRINT#1," 2 +9 ";:RETURN :rem 191 
PRINT#1,"K+](2 SPACES} &+9";:RETU 

RN srem 192 
PRINT#1," £2 +9 RETURN :rem 193 
PRINT#1," &2 +9 ";:RETURN srem 190 


PRINT#1,"E+3(2 SPACES} R+9";:RETU 
RN trem 191 


PRINT#1,"_&3 +9";:RETURN :rem 162 
PRINT#1,"{3 SPACES) &+]";: RETURN 


trem 27 
PRINT#1," £2 +3 ";:RETURN :rem 194 
PRINT#1,"{2 SPACES}&+9 ";:RETURN 
trem 17 
PRINT#1,"{2 SPACES}§+J ";:RETURN 
trem 18 
PRINT#1,"(2 SPACES}R+9 ";:RETURN 
rem 19 
PRINT#1,"{2 SPACES}£+3 ";:RETURN 
zrem 20 
PRINT#1,"{2 SPACES}£+] ";:RETURN 
trem 21 
GOSUB2000:PRINT#1," —3 + 
(3 SPACES}&3 +3{2 SPACES] R43 
(3 SPACES} §+3" trem 193 


GOSUB200:PRINT#1,"{2 SPACES} §+3 
{3 SPACES}£+3(3 SPACES} £+] 

£2 +3(2 SPACES} £+3" rrem 118 
GOSUB2000:PRINT#1,"{2 SPACES} £+] 
(3 SPACES) &+3{3 SPACES}E+] &+] 

B+} £43" trem 119 
GOSUB2060:PRINT#1,"R+9 E+] 

{3 SPACES}£5 +3 &+3{2 SPACES} 

g2 +3" zrem 16 
GOSUB2000:PRINT#1,"3 +9[3 SPACES} 
E+3(3 SPACES}&+9 £+3(3 SPACES} 
B+3" trem 31 
RETURN rrem 169 
GOSUB2060:PRINT#1,"R5 +9 &5 +9 

B4 +3" trem 166 
GOSUB2000:PRINT#1,"R+3{5 SPACES} 
E+3(5 SPACES}&+3{3 SPACES}&+3" 

rem 43 

GOSUB2000:PRINT#1,"3 +3{3 SPACES} 
R4 +3{2 SPACES}£4 +} " :rem 182 
GOSUB2000:PRINT#1,"K+3(5 SPACES} 
E+3(5 SPACES}&+3(3 SPACES)R+3" 


trem 45 
GOSUB2090: PRINT#1,"R+9(5 SPACES} 
&5 +] &4 +9 " trem 18 
RETURN rrem 170 
GOSUB200G: PRINT#1,"E+]{3 SPACES} 


&+9(2 SPACES}£3 +3{2 SPACES} 

g4 +9 " rrem 105 
GOSUB2G00:PRINT#1,"B2 +} £2 +] 
£+3(3 SPACES}£+3 &+3(3 SPACES} 
g+3" trem 196 


3032 


3833 


3034 


3835 
3848 


3041 


3042 


3043 


3044 


3045 
3058 


3051 


3052 


3053 


3054 


3055 
3068 


3061 


3062 


3063 


3064 


3065 
3078 


3671 


3072 


3073 


3674 


3075 
3688 


GOSUB2000:PRINT#1,"E+] £+9 £+] 
&+3(3 SPACES}E+3 £4 +3 " trem 167 
GOSUB2000:PRINT#1,"E+3 E+3 £+3 
£5 +3 &+3(2 SPACES}E+]3 " 
trem 18 
GOSUB2090: PRINT#1,"£+3{3 SPACES} 
R+39 &+3({3 SPACES}E+] £+]9 
{3 SPACES} £+]3" 
RETURN 
GOSUB2006:PRINT#1," £3 +] 
{2 SPACES}£4 +3{2 SPACES}R4 +3 " 
trem 182 
GOSUB2000: PRINT#1,"&+3{3 SPACES} 
+3 &+9(3 SPACES}K+} &+] 
{3 SPACES}§+3" trem 121 
GOSUB2000; PRINT#1,"£+9(3 SPACES} 
£+} £4 +3[2 SPACES}£4 +3 " 


trem 123 
srem 171 


trem 18 
GOSUB2000:PRINT#1,"—5 +3 &+3 
(5 SPACES}£+9{2 SPACES}E£+} " 
trem 199 
GOSUB2006:PRINT#1,"£+3(3 SPACES} 
&+3 &+39(5 SPACES}£+3(3 SPACES} 
B+a" trem 214 
RETURN rrem 172 
GOSUB2000: PRINT#1,"E+3{3 SPACES} 
&+9{2 SPACES}£3 +3{2 SPACES} 
&+3(3 SPACES}E+3" zrem 31 
GOSUB2006:PRINT#1,"2 +9 &2 +3 
R+3(3 SPACES}£+} &+3{3 SPACES} 
g+9" trem 198 
GOSUB2000:PRINT#1,"R+9 E+) &+9 
R+9(3 SPACES}£+9{2 SPACES} E+] 
g+a " rrem 33 
GOSUB2080:PRINT#1, "+3 £+3 +9 
&5 +3{3 SPACES}£+3{2 SPACES}" 
zrem 116 
GOSUB2000:PRINT#1,"+3{3 SPACES} 
R+a &+9(3 SPACES}£+3(3 SPACES) 
&+3(2 SPACES}" trem 215 
RETURN srem 173 
GOSUB2006sPRINT#1," £3 +39 
(2 SPACES} £+3{3 SPACES}E+] &+] 
{3 SPACES}§+3" rrem 32 
GOSUB2000: PRINT#1,"{2 SPACES}£+3 
(3 SPACES}£+3{3 SPACES}£+] 
&2 +3(2 SPACES]§+3" trem 123 
GOSUB2066:PRINT#1,"{2 SPACES}£+]9 
(3 SPACES}£+3{3 SPACES)R+] £+] 
B+3 +3" rrem 124 
GOSUB2006:PRINT#1,"E+9 E+] 
{3 SPACES}£+3{3 SPACES]}E+} £+3 
{2 SPACES}£2 +3" zrem 35 
GOSUB2000:PRINT#1, "£3 +3{4 SPACES} 
&3 +3(2 SPACES}£+3(3 SPACES} 
g+a" rrem 202 
RETURN srem 174 
GOSUB200G:PRINT#1," £3 +] 
(2 SPACES}£+]3(3 SPACES}E+]2 E+] 
{4 SPACES}" rem 123 
GOSUB2000:PRINT#1,"{2 SPACES}£+] 
{3 SPACES}E£+3{3 SPACES}E+]3 +3 
{4 sPACES}" irem 48 
GOSUB2006:PRINT#1,"{2 SPACES}&+]9 
{3 SPACES}£+3{3 SPACES}&+] £+3 
{4 spacEs}" rrem 49 
GOSUB2000:PRINT#1,"E+3 &+] 
{3 SPACES}£+9{3 SPACES}£+J &+2 
{4 SPACES}" trem 216 
GOSUB2000:PRINT#1,"£3 +]{4 SPACES} 
&3 +39({2 SPACES}£5 +3" trem 189 
RETURN trem 175 
GOSUB200:PRINT#1," £3 +3 — 


381 


3682 


3883 


3684 


3085 


3096 


3691 


3892 


3093 


3094 


3095 


3106 


3101 


3162 


3163 


3104 


3105 
3116 


3111 


3112 


3113 


3114 


3115 


3126 


3121 


3122 


3123 


3124 


{2 SPACES}£+3{3 SPACES}£+] 
{2 SPACES}£3 +] " rrem 206 
GOSUB206: PRINT#1,"£+3{3 SPACES} 
E+] £+3(3 SPACESJE+9 £+3 
{4 SPACES}" trem 215 
GOSUB2060: PRINT#1,"+3{3 SPACES} 
E+3 &+3(3 SPACES}E+9 £+9 
{2 SPACES}£2 +3" rrem 36 
GOSUB200G:PRINT#1,"85 +3 +3 
{3 SPACES}E+} £+3{3 SPACES} E+] 
s zrem 113 
GOSUB2006:PRINT#1,"E+3{3 SPACES} 
£+3{2 SPACES}£3 +]{3 SPACES} 
£3 +9" rrem 204 
RETURN trem 176 
GOSUB2000:PRINT#1," R4 +9 £5 +3 
{SPACE}£4 +] " trem 7 
GOSUB2000:PRINT#1,"E+3{5 SPACES} 
&+3(5 SPACES}£+J(3 SPACES}£+3" 

srem 58 
GOSUB200G:PRINT#1," £3 +] 
{2 SPACES]£4 +3(2 SPACES}£4 +] " 

zsrem 189 
GOSUB2000:PRINT#1,"(4 SPACES}£+3 
&+3(5 SPACES}£+3{4 SPACES}" 

zrem 142 


GOSUB2006: PRINT#1,"4 +3{2 SPACES} 
£5 +3 &+3{4 SPACES}" trem 25 
RETURN trem 177 


GOSUB2000:PRINT#1," £3 +] 
(3 SPACES)R3 +3(2 SPACES)R5 +3" 

trem 179 
GOSUB2606: PRINT#1,"R+3{3 SPACES} 
&+] &+3{3 SPACES}&+](3 SPACES} 
£+3{2 SPACES}" trem 208 
GOSUB200@: PRINT#1,"£+3{3 SPACES} 
&+3 &+3(7 SPACES}£+3(2 SPACES} 
os trem 43 
GOSUB2000: PRINT#1,"£+]{3 SPACES} 
E+} &+3{3 SPACES)£+3(3 SPACES} 
&+3(2 SPAcEs}" trem 216 


GOSUB200G:PRINT#1," §3 +] 

{3 SPACES}£3 +3(4 SPACES} +] 

{2 SPACES)" rrem 31 
RETURN rrem 169 


GOSUB2000: PRINT#1,"+3{3 SPACES} 
&+3(2 SPACES)&3 +9(2 SPACES} 
£+3(3 SPACES) +3" trem 28 
GOSUB2000:PRINT#1,"£2 +3(2 SPACES} 
E+3 £+3(3 SPACES}R+9 £+3 

{3 SPACES} £+3" rrem 29 
GOSUB2606:PRINT#1,"E+3 £+3 &+3 

E+3{3 SPACES}£+3 &+3 

{3 SPACES} £+3" trem 36 
GOSUB2000: PRINT#1,"+3{2 SPACES} 
&2 +3 E+3(3 SPACES)E+3 

{2 SPACES}£+] £+3 " trem 31 
GOSUB2000:PRINT#1,"£+3(3 SPACES} 
&+3(2 SPACES}R3 +3(4 SPACES} 
£+3{2 SPACES}" trem 122 
RETURN rrem 178 
GOSUB2000:PRINT#1,"£4 +3{2 SPACES} 
£5 +3{2 SPACES}£3 +3 " trem 91 
GOSUB2006:PRINT#1,"§+3{3 SPACES} 

E+] &+4(5 SPACES}&+3{3 SPACES} 

g+3" trem 216 
GOSUB2000:PRINT#1,"E+3{3 SPACES} 
E+3 £4 +3{2 SPACES} E+] 

{4 SPACES}" trem 31 
GOSUB2000: PRINT#1,"£+3{3 SPACES} 
B+] &+3{5 SPACES}&+](3 SPACES} 

B+" rrem 212 
GOSUB2090: PRINT#1,"4 +3{2 SPACES} 
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3125 
3206 


3216 
3211 
3212 
3213 
3214 


3215 
3314 


3315 
3414 


3415 
3514 


3515 


3614 


3615 
4960 


4020 


40308 


4035 


4060 
4980 
4085 


4110 
4130 


4999 
5008 
5081 
6080 
6010 


6828 
7680 


7818 


7620 
8008 


801 


8628 
9080 


B5 +3{2 SPACES}£3 +] "| :rem 95 
RETURN zrem 171 


I1=INT(Y¥/1000) :J1=Y-11*1600:12=1NT(J 
1/108) :32=31-12*166:13=INT(J2/10) 
trem 83 
14=J2-13*10 trem 48 
IFI2=6THENI2=10 rem 134 
IFI3=OTHENI3=10 trem 137 
IFI4=0THENI4=16 trem 140 


GOSUB200G:X=11 : GOSUB6090 : GOSUB2000:X 
=12:GOSUB69G0 : GOSUB2000 : X=13 : GOSUB6O 
00 trem 98 
GOSUB2000:X=14:FL=1:GOSUB6900:rem 19 
GOSUB2000 : X=11 : GOSUB7000 : GOSUB2000:X 
=12:GOSUB7000 : GOSUB2006 : X=13: GOSUB78 
00 trem 102 
GOSUB2000 : x: =1:GOSUB7808:rem 21 
GOSUB2008 : X=. OSUB8GBO : GOSUB2000:X 
=12:GOSUB8000 : GOSUB206 : X=13: GOSUB8O 
80 trem 186 
GOSUB2000:X=14:FL=1:GOSUB8000:rem 23 
GOSUB200G:X=I 1 : GOSUB900@ : GOSUB2000:X 
=12:GOSUB9@00 : GOSUB2000 :X=13:GOSUB9O 
oo rrem 118 
GOSUB2000:X=14:FL=1:GOSUB9000:rem 25 
GOSUB2000 :X=11 : GOSUB19900 : GOSUB2000: 
X=12:GOSUB10000 : GOSUB2008 :X=13 
trem 60 
GOSUB19009 : GOSUB2009 :X=14:FL=1:GOSUB 
10000: RETURN trem 7 
PRINT" {CLR} {DOWN}{2 SPACES]THIS IS A 
PROGRAM": PRINT"({5 RIGHT}TO PRINT A" 
srem 115 
PRINT."{2 SPACES}{PUR}MONTHLY CALENDA. 
R(BLU}"s PRINT" (3 RIGHTJON THE PRINTE 
R" :rem 187 
PRINT" (DOWN}(2 RIGHT}PLEASE TYPE IN 
{SPACE} THE":PRINT"(3 RIGHT} {RED}MONT 
H{BLU} AND (RED}YEAR{BLU}" :rem 185 
PRINT" THAT YOU WISH TO SEE":PRINT" 
{2 SPACES}(EXAMPLE: {RED}12,1983 
{BLU}) {PUR} {DOWN}": PRINTTAB(5); 
trem 211 
INPUTMG, ¥ rrem 92 
PRINT" (2 DOWN}{2 SPACES}{BLU}THANK Y 
OU! NOW--":PRINT" PLEASE {PUR]TURN O 
N(BLU} THE" :rem 7 

















PRINT"PRINTER AND THEN TYPE":PRINTTA 
B(8)"{PUR}JOK{DOWN}":INPUTRS$ :rem 252 
IFRS <> "OK" THEN4088 trem 30 
PRINT" { BLU} PRINTING [DOWN}":FORI=1T08 
0@:NEXT : RETURN trem 218 
PRINT#1,CHR$(15)" " rrem 232 
GOSUB1620 trem 14 
CLOSE1:END trem 126 
ONXGOSUB2611, 2621, 2031, 2041, 2051, 206 
1,2071, 2681, 2091, 2001 rrem 146 
IFFL<>1THENPRINT#1," ";:RETURN 

rrem 104 
PRINT#1,"":FL=@: RETURN trem 108 
ONXGOSUB2012, 2622, 2032, 2042, 2052, 206 
2, 2072, 2682, 2092, 2082 trem 157 
IFFL<>1THENPRINT#1," ";:RETURN 

trem 165 
PRINT#1, "":FL=@: RETURN trem 109 
ONXGOSUB2G13, 2023, 2033, 2043, 2053, 206 
3, 2073, 2083 , 2093, 2003 trem 168 
IFFL<>1THENPRINT#1,"_ ";sRETURN 

rrem 106 
PRINT#1,"":FL=@: RETURN zrem 116 
ONXGOSUB2014, 2024, 2034, 2044, 2054, 266 
4, 2074, 2084, 2094, 2084 srem 179 
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9616 IFFL<>1THENPRINT#1," ";:RETURN 





9620 PRINT#1,"":FL=0: RETURN 
16888 ONXGOSUB2015, 2625, 2035, 2045, 2055, 28 


65,2075, 2085, 2695, 2005 trem 229 

10818 IFFL<>1THENPRINT#1," ";:RETURN 
rem 147 
19026 PRINT#1,"":FL=0:RETURN trem 151 
11866 ONXGOSUB2000, 2111, 2021, 2031:PRINT#1 
yes trem 195 


11616 Onx1GosuB2090, 2001, 2011,2021,2031,2 
41,2051, 2061, 2071, 2081,2091 


trem 222 

11620 IFFL<>1THENPRINT#1,"{2 SPACES)"; :RE 
TURN trem 149 

11036 FL=0:PRINT#1,"":RETURN trem 153 
12068 ONXGOSUB200@, 2112, 2622, 2032:PRINT#1 
enh zrem 199 


12018 ONX1GOSUB2900 , 2662, 2612, 2022, 2032,2 
G42, 2052, 2662, 2672, 2082, 2092 





trem 233 

12020 IFFL<>1THENPRINT#1,"(2 SPACES)"; :RE 
TURN trem 150 

12038 FL=0:PRINT#1,"":RETURN trem 154 
13088 ONXGOSUB2966, 2113, 2023, 2033:PRINT#1 
es rem 283 


13618 ONX1GOSUB2000, 2903, 2013, 2623, 2033,2 
843, 2853, 2063, 2073, 2083, 2093 


srem 244 

13020 IFFL<>1THENPRINT#1,"{2 SPACES)"; :RE 
TURN trem 151 

13030 FL=0:PRINT#1,""s RETURN trem 155 
14668 ONXGOSUB200@, 2114, 2024, 2034: PRINT#1 
ae] trem 207 


14818 ONX1G0SUB200, 2064, 2014, 2024, 2034,2 
044, 2054, 2064, 2674, 2084, 2094 


trem 255 

14026 IFFL<>1THENPRINT#1,"(2 SPACES}";:RE 
TURN trem 152 

14630 FL=6:PRINT#1,"":RETURN trem 156 
15088 ONXGOSUB2000, 2115, 2625, 2035: PRINT#1 
ah trem 211 


15818 ONx1G0sUB2009, 2005, 2015, 2625, 2035,2 
045, 2055, 2065, 2075, 2085, 2095:rem 19 
15626 IFFL<>1THENPRINT#1, "(2 SPACES)"; :RE 
TURN srem 153 
15630 FL=6:PRINT#1,"":RETURN rem 157 


Program 3: 
Monthly Appointment Calendar For 
Printer 


80 DIMM$(12),W$(7):FORI=1T012:READM$(I):N 
EXTI : FORI=1T071READWS$ (I) :NEXTI:rem 118 
98 SYS65517:A=PEEK( 781) : IFA=4@THENPOKE532 
81,1 rrem 167 
108 PRINT" ({CLR}{DOWN}{2 SPACES}THIS IS A 
SPACE}PROGRAM":PRINT"[{6 RIGHT}TO SHO 
wa" trem 17 
105 PRINT"{2 RIGHT}{PUR}MONTHLY CALENDAR 
BLU}":PRINT"{3 RIGHTJON THE PRINTER 
DOWN}" rrem 214 
118 PRINT"{RIGHT}PLEASE TYPE IN THE":PRIN 
T"(3 RIGHT}{REDJMONTH{BLU) AND [RED}Y 
EAR({BLU}" rrem 86 
111 PRINT"THAT YOU WISH TO SEE":PRINT" 
{RIGHT} (EXAMPLE: [RED}]12,1983{BLU}) 
PUR}{2 DOWN}" rrem 165 
120 PRINTTAB(5);:INPUTMO,Y rrem 132 
13@ PRINT"{2 DOWN}{2 SPACES}(BLU}THANK YO 
UL NOW--":PRINT" PLEASE {PUR}TURN ON 
BLU} THE" rrem 207 




















131 PRINT"PRINTER AND THEN TYPE":PRINTTAB 
(9)"{PUR}OK{DOWN}":INPUTRS em 193 
151 IFR$<>"OK"THEN130 rrem 183 
154 PRINT" ({BLU}PRINTING{DOWN}":FORI=1T086 
@:NEXT:GOSUB1292:0PEN1,4 trem 23 
202 PRINT#1,CHR$(14)"{3 SPACES}";M$(MO);" 
";¥:GOSUB1690 : GOSUB170@ : FORD=1TOE1:J 
lsJ1+1 trem 225 
216 GOSUB1050:IFD<1@THENG$="_"  :rem 158 
213 IFD>=10THENGS="" trem 96 
214 IFD1=1THENPRINT#1,CHR$(15)"{3 SPACES} 
"WS (D1) ;CHR$(14)G$;"(RVS}"D"{OFF}";CH 
RS(15)"(";I1;")" trem 71 
215 IFD1=1THENGOSUB1690 trem 128 
217 IFD1=1THENGOTO220 trem 8 
219 PRINT#1,CHR$(15)"{3 SPACES}"W$(D1);CH 
R$ (14)G$;D;CHRS(15)"(";Jd1;")":GOSUBL6 
oo rrem @ 
220 NEXTD trem 23 
1088 CLOSE1:END trem 121 
1050 IFM@=1THENM@=13:Y=Y-1:GOTO1080 
trem 88 
1060 IPMO=2THENMO=14:Y=Y-1 trem 23 
1080 M=Md-2 trem 47 
1180 D1=INT(2.6*M-@.2)+D+Y-1960+INT((Y-19 
90)/4) trem 207 
115@ D1=D1+INT(19/4)-2*19 trem 21 
1260 D1=D1-INT(D1/7)*7+1 trem 235 
1210 IFMO=40RMO=9THEND1=D1+1 trem 135 
1230 IFMO=13THENMO=1 :Y=Y+1:GOTO1245 
trem 81 
1240 IPMO=14THENMO=2:Y=Y+1:D1=D1+1 
trem 210 
1244 IFD1=8THEND1=1 trem 86 
1245 IF(Y=21@0ANDM@>=3)OR(Y>2100)THEND1=D 
1-1:IFD1=@THEND1=7 rrem 198 
1247 IF(Y=2260ANDM@>=3)OR(Y> 2200) THEND1=D 
1-1: IFD1=0THEND1=7 trem 202 
1249 IF(Y=2300ANDMO>=3)OR(Y>2300)THEND1=D 
1-1:IFD1=OTHEND1=7 trem 206 
1250 RETURN trem 168 
1292 IPMO=10RMS=30RMO=5ORMO=70RMO=BORMO=1 
GORMO=1 2THENE1=31 trem 75 
1293 IFMS=40RMO=60RMO=90RMO=11THENE1=30 
trem 115 
1294 IFM@=2ANDY/4<>INT(Y/4)THENE1=28 
trem 152 
1295 IFMO=2ANDY/4=INT(¥/4)THENGOSUB1400 
trem 132 
1296 RETURN rrem 178 
1466 IF(Y/100=INT(Y/10G) )AND(Y¥/400<>INT(Y 
/490) ) THENE1=28:GOTO1416 trem 231 
1495 E1=29 trem 232 
1416 RETURN trem 166 
1606 FORI=1T020:PRINT#1,CHR$(15)" ";:NEXT 
I rrem 170 
16@5 FORK=1T018:PRINT#1,"."7" "7" ";:NEXT 
K:PRINT#1,"." trem 231 
1618 RETURN srem 168 
1760 IFMO=1THENJ1=0 rrem 89 
1782 ‘THENJ1=31 rrem 144 
1704 THENJ1=59 rrem 157 
1786 IFMO=4THENI1=96 trem 155 
1707 IFMO=5THENJ1=120 rrem 199 
1769 IFMO=6THENJ1=151 rrem 206 
1711 IFM@=7THENJ1=181 rrem 203 
1713 IFM@=8THENJ1=212 trem 201 
1715 IFMO=9THENJ1=243 rrem 208 
1717 IFMO=10THENJ1=273 trem 253 
1719 IFMO=11THENJ1=304 trem 251 
1721 IFM@=12THENJ1=334 trem 248 
1723 IFY/4<>INT(¥/4)THENGOTO1730 :rem 189 
1725 IF(¥/100=INT(¥/100) )AND(Y¥/400<>INT(Y 


1727 
1736 
2008 
2010 


2026 
28630 


2048 


/49G) ) THENGOTO1730 trem 159 
IF(¥/4=INT(Y/4))AND(MO>=3)THENJ1=J1+ 
1 trem 175 
RETURN trem 171 
DATA "{2 SPACES}JANUARY"," FEBRUARY" 
1 "{4 SPACES }MARCH","{4 SPACES ]JAPRIL" 
"(6 SPACES }MAY" trem 36 
DATA "{5 SPACES}JUNE","{5 SPACES}JUL 
Y","{3 SPACES}AUGUST", "SEPTEMBER", " 
{2 SPACES }JOCTOBER" trem 229 
DATA " NOVEMBER"," DECEMBER" :rem 39 
DATA "(4 SPACES}{RVS}SUNDAY(OFF}"," 
{4 SPACES}MONDAY","{3 SPACES} TUESDAY 
"," WEDNESDAY", "{2 SPACES } THURSDAY" 
srem 90 
DATA "{4 SPACES)FRIDAY","({2 SPACES}S 
ATURDAY" trem 192 


Program 4: 


Yeq: 
3s 


rly Calendar For Printer 


SYS65517sA=PEEK(781) 1 1FA=40THENPOKES328 
ol trem 113 


5 creat +43:DIMW4 (3) :GOSUB1516;I=l:J=2 


trem 128 


7 PRINT#1,CHR$(14)SPC(13)"HAPPY NEW YEAR 


i 
16 


12 


SPACE}";Y:PRINT#1 trem 38 
PRINT#1,CHR$(14)SPC(8) "JANUARY"SPC(13) 
"FEBRUARY" trem 49 
GOSUB1009 : GOSUB1909:GOSUB1612:C0=6:GOS 
UB1@19 :GOSUB1906:GOSUB1622 trem 69 


15 M@=1I:M8=1:GOSUB292:GOSUB20:GOTO35 
trem 228 
26 D=1:GOSUB1050:W2=8-D1:W4(M8)=W2+1:GOSU 
B321 trem 123 
22 IFD1=7THENGOTO30 zrem 167 
25 FORD=2TOW2:GOSUB1656:GOSUB331:NEXTD 
trem 187 
308 RETURN trem 67 
35 GOSUB990 :MO=J :M8=2:GOSUB292:GOSUB20 
trem 105 
44 W3=1 trem 96 
45 MO=I:M8=1:GOSUB292:GOSUB208 rem 66 





46 IFW4(2)=9THENPRINT#1,CHR$(15)SPC(1); 
zrem 26 

58 GOSUB991 :MO=J :M8=2:GOSUB292:GOSUB200 
trem 151 
56 IFW3=1ANDW4(1)>9THENPRINT#1,CHR$(15)SP 
C(B); trem 223 
57 IFW3=1ANDW4(1)<1OTHENPRINT#1,CHR$(15)S 
PC(1); zrem 7 
58 IFW3=4ANDW4(2)>3O0THENPRINT#1,CHR$(15)S 
PC(B); trem 15 
65 W3=W3+1 trem 24 
70 IFW3<COTHENGOTO4S trem 6 
71 PRINT#1," " trem 185 
72 IFI=1THENGOTO86 trem 133 
73 IFI=3THENGOTO96 trem 137 
74 IFI=5THENGOTO106 trem 180 
75 IF. THENGOTO116 rem 184 
76 IFI=9THENGOTO126 srem 188 
77 IFI=11THENGOTO199 rem 246 
86 PRINT#1, CHRS(14)SPC(9) "MARCH "SPC(16) "A 
PRIL" trem 171 
88 I=3:J=4:GOTO12 trem 244 
96 PRINT#1,CHR$(14)SPC(16)"MAY"SPC(17) "JU 
NE" trem 11 
98 I=5:J=6:GOTO12 trem 249 
166 PRINT#1,CHR$(14)SPC(9)"JULY"SPC(16)"A 
uGusT" trem 14 
168 I=7:J=8:GOTO12 trem 37 
116 PRINT#1,CHR$(14)SPC(7)"SEPTEMBER"SPC( 
13) "OCTOBER" srem 162 
118 I=9:J=18:GOTO12 trem 81 
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336 
358 
428 


429 
438 


431 
433 
435 
528 


529 
538 


531 
532 


533 
535 


PRINT#1,CHR$(14)SPC(7)"NOVEMBER"SPC(1 


3) "DECEMBER" eatin 131 
I=11:J=12:GOTO12 em 125 
PRINT#1,CHRS(15)SPC(1) :CLOSE1: END 
rrem 194 
D4=W4 (M8) :D7=W4 (M8) +6 srem 92 
D=D4:GOSUB1050 trem 16 
IFD1<>1THENPRINT"WHY Dl=";D1 :rem 156 


IFM8=1AND(D+1)<1@THENGOSUB528:rem 198 
IFM8=1AND(D+1)>9THENGOSUB530 :rem 154 
IFM8=2AND(D+1)<16THENGOSUB428:rem 200 
IFM8=2ANDD4 >=30ANDD4 <=E1 THENGOSUB433: 
GOTO217 trem 212 
IFM8=2AND(D+1)>9THENGOSUB430 :rem 157 
FORD=D4+1TOD7:GOSUB1 950: GOSUB331:NEXT 
D srem 139 
W4(M8)=D7+1 srem 9 
RETURN trem 121 
IFM@=10RM@=30RMO=5ORMO=70RMO=BORMZ=19 
ORMO=1 2THENE1=31 zrem 26 





IFMO=40RMO=6ORMO=90RMO=11THENE1=36 

trem 66 
IFM@=2ANDY/4<>INT(Y/4)THENE1=28 

trem 103 
IFM@O=2ANDY /4=INT(Y/4) THENGOSUB1400 

trem 83 
RETURN trem 129 
IFD1=7THENPRINT#1,CHR$(15)SPC(36);D;: 
GOTO330 trem 101 
IFD1=6THENPRINT#1,CHR$(15)SPC(31);D;7 = 


GOTO330 trem 96 
IFD1=5THENPRINT#1,CHR$(15)SPC(26);D; 
GOTO330 trem 168 
IFD1=4THENPRINT#1,CHR$(15)SPC(21);D72 
GOTO330 trem 95 
IFD1=3THENPRINT#1,CHR$(15)SPC(16);D;: 
GOTO336 trem 99 
IFD1=2THENPRINT#1,CHR$(15)SPC(11);D;¢ 
GOTO338 trem 94 
IFD1=1THENPRINT#1,CHR$(15)SPC(6);D;:G 
OTO330 trem 50 


PRINT#1,CHR$(15)SPC(3) ;D; :GOTO330 
trem 143 
PRINT#1,CHR$(15)SPC(2);D; trem 134 
RETURN :rem 118 
IFD>E1THENPRINT#1,CHR$(15)SPC(5);:GOT 
0350 trem 196 
IFD1=1LANDD<=9THENPRINT#1 , D; :GOTO358 
trem 153 
IFD1=1ANDD>9THENPRINT#1, D; :GOTO359 
trem 95 
IFD<=9THENPRINT#1, CHR$(15)SPC(2);D7:G 
0T0359 srem 66 
PRINT#1,CHR$(15)SPC(1)7D; rrem 131 
RETURN trem 126 
IFD>ELTHENPRINT#1, CHR$(15)SPC(9);:GOT 
0435 trem 211 
GOTO328 trem 117 
IFD>E1 THENPRINT#1,CHR$(15)SPC(9);:GOT 
0435 rrem 204 
GOTO329 trem 111 
PRINT#1,CHR$(15)SPC(1);D; trem 129 
RETURN trem 124 
IFD>E1THENPRINT#1,CHR$(15)SPC(9);:GOT 
0535 trem 213 
GOTO532 trem 115 
IFD>E1THENPRINT#1,CHR$(15)SPC(9); GOT 
0535 rrem 206 
GOTO533 rrem 169 
PRINT#1,CHR$(15)SPC(5);D;:GOTOS35 
rrem 149 
PRINT#1,CHR$(15)SPC(4);D; trem 133 
RETURN trem 125 
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998 PRINT#1,CHRS$(15)SPC(3);:GOTO992 


srem 35 
991 PRINT#1,CHR$(15)SPC(6); trem 16 
992 RETURN trem 132 
1006 PRINT#1,CHR$(15)SPC(7); trem 47 
1001 RETURN rrem 162 
1069 PRINT#1,CHR$(15)SPC(3); trem 52 
1010 PRINT#1,"{4 SPACES}S{4 SPACES}M 


1611 
1612 


1613 
1619 
1626 


1621 
1622 


1923 
1658 


1668 
1088 
1108 
1158 
1200 
1216 
1236 
1248 


1244 
1245 


1247 
1249 


1258 
14608 


1405 


1418 
1518 


1526 


1538 


1535 


1578 


1573 


1575 


1588 
1585 
1598 


{4 SPACES}T{4 SPACES}w{4 SPACES}T 

{4 SPACES}F{4 SPACES}S"; trem 134 
RETURN rrem 163 
PRINT#1,"{4 SPACES}S{4 SPACES}M 

{4 SPACES}T{4 SPACES}W{4 SPACES}T 


{4 SPACES}F(4 SPACES}S" trem 77 
RETURN trem 165 
PRINT#1,CHR$(15)SPC(3); trem 53 


PRINT#1,"{4 SPACES}£T3(4 SPACES} 
RT9{4 SPACES}£T9(4 SPACES) R&T 

{4 SPACES}£TJ{4 SPACES) RT 

{4 SPACES} ET3"; rrem 196 
RETURN rrem 164 
PRINT#1,"{4 SPACES}£T9[4 SPACES} 
&Td{4 SPACES}£T9{4 SPACES)&T9 

{4 SPACES}£T3(4 SPACES)RT] 


{4 SPACES} —T3" srem 139 
RETURN rrem 166 
IfMO=1THENMO=13:Y=Y-1:GOTO1080 

trem 80 
IFM@=2THENMO=14: Y=Y-1 rrem 23 
M=M@-2 rrem 47 
D1=INT(2.6*M-O.2)+D+Y-190B+INT((Y-19 
@0)/4) trem 207 
D1=D1+INT(19/4)-2*19 trem 21 
D1=D1-INT(D1/7)*7+1 trem 235 
IFMO=40RMG=9THEND1=D1+1 trem 135 


IFM9=13THENM@=1 : Y=Y+1:GOTO1250 

srem 77 
IFMO=14THENMO=2: Y=Y+1:D1=D1+1 

rem 210 
IFD1=8THEND1=1 trem 86 
IF (Y=2100ANDM@>3)OR(Y>2100)THEND1=D1 
-1:IFD1=O6THEND1=7 rem 137 
IF (Y=2200ANDMO>3)OR(Y>2206)THEND1=D1 
-1:IF{K}{RVS}=OTHEND1=7 trem 53 
IF (Y=230@ANDMG>3)OR(Y>2300)THEND1=D1 
-1:IFD1=@THEND1=7 trem 145 
RETURN trem 168 
IP(Y/10@=INT(Y/100) )AND(Y/490<>INT(Y 


/480) )THENE1=28:GOTO1416 trem 231 
E1=29 trem 232 
RETURN trem 166 


PRINT" {CLR} {DOWN}{2 RIGHT}THIS IS A 
(SPACE}PROGRAM":PRINT"(6 RIGHT}TO SH 
ow A" trem 129 
PRINT"{3 RIGHT} ({PUR}YEARLY CALENDAR 
{BLU}":PRINT"{3 RIGHTJON THE PRINTER 
{pown}" trem 208 
PRINT" {RIGHT}PLEASE TYPE IN THE":PRI 
NT"{3 RIGHT}YEAR THAT YOU": PRINT" 
{4 RIGHT}WISH TO SEE" rrem 38 
PRINT"{3 RIGHT} (EXAMPLE: {PUR}1984 
{BLU}){2 DOWN}":PRINTTAB(6);:INPUTY 
rrem 195 
PRINT" {DOWN}(3 RIGHT}THANK YOU! NOW- 
-":PRINT"{RIGHT}PLEASE TURN ON THE" 
trem 145 
PRINT“PRINTER AND THEN TYPE" :rem 9 
PRINTTAB(8)"{PUR}OK {BLU} {DOWN}" 


rem 165 
INPUTRS$ trem 212 
IFRS$<>"OK"THEN1578 trem 44 


PRINT" PRINTING { DOWN)": FORI=1T0800:NE 
XT:RETURN trem 194 


Bingo 64 


(Article on page 54.) 








158 
168 


178 
186 
198 
206 
216 
228 
230 
246 


258 
2698 


276 
289 
298 
386 
316 
326 
336 
340 
358 
368 
376 
388 
398 
408 


410 
420 


436 
446 


450 
468 


BEFORE TYPING... 
Before typing in programs, please refer to “How 
To Type COMPUTE 's Gazette Programs,” “A 
Beginner's Guide To Typing In Programs,” and 
e Automatic Proofreader” that appear before 
the Program Listings. 





POKE53281,1:POKE 53280,1 
$S=54272:V=53248 :D0=56323 :D1=56320:D2 


trem 237 


=56321:POKE V+21,0 trem 194 
PRINT CHR$(147),CHR$(17),CHR$(17) 
zrem 223 


PRINTSPC(14);CHR$(18);CHR$(31); "MODES 

OF PLAY":PRINT srem 58 
PRINTSPC(14) ;CHRS$ (28); "***##eeeRRR HEN 
:PRINT zrem 34 


PRINTSPC(4);CHR$(144);"1- AUTO BALL F 
EED{3 SPACES}- AUTO COVER" :rem 218 
PRINTSPC(4);"2- MANUAL BALL FEED - AU 
TO COVER" trem 59 
PRINTSPC(4);"3- MANUAL BALL FEED - MA 
NUAL COVER" trem 194 
PRINTSPC(4);"4- AUTO BALL FEED 

{3 SPACES}- MANUAL COVER" trem 63 
PRINT: PRINT"{5 SPACES}ENTER MODE SELE 
CTED: 





GET AS$:IF A$=""THEN 256 
AU=VAL(A$)-1:IF AU<@ OR AU>3 THEN 176 
srem 156 
M1$="-CHIME RINGS FOR NUMBER ON CARD" 
trem 57 
M2$="-GONG RINGS FOR NUMBER ON NO CAR 
pb" zrem 157 
M3$="-HIT ANY KEY FOR BALL PEED" 
zsrem 185 
M4$="-USE JOYSTICK (PORT 2)-FIRE TO C 
OVER" :rem 128 
PRINTCHR$ (147) ,CHR$(17),CHRS$(17) 
trem 219 
PRINT SPC(2);M1$:PRINT SPC(2);M2$ 
rem 118 
IF AU=1 OR AU=2 THEN PRINT SPC(2);M3$ 
zrem 211 
IF AU=2 OR AU=3 THEN PRINT SPC(2);M4$ 
rem 215 
PRINT:PRINT SPC(10);"HIT ANY KEY TO S 
TART" rem 234 
GET A$:IF A$=""THEN 360 srem 85 
PRINT CHR$(147) rrem 21 


REM*** READ THE ML CODE TO SET A BLOC 
K OF MEMORY *** trem 213 
FOR I=@TO11:READ X%:POKE 28672+I,X3:N 
EXTI rem 98 
REM*** SET THE COLOR MEMORY TO BLACK 
{SPACE} *** trem 153 
FOR I=@T03:HB=216+I trem 22 
POKE 251,0:POKE252,HB: POKE253,@:POKE2 
54,0:SYS 28672:NEXT trem 235 
DIM SD(4,62),CO(5),X(5),¥(5),PL(21),F 
H(21),DU(21),C(3,4,4),N(4,14) :rem 22 
CO()=8:C0(1)=14:C0(2)=4:C0(3 
co(5 








L(@)=130:L(1)=137:L(2)= 142:L(3)= 135:L 
(4)=143 trem 180 
S(8)=1104:S(1)=1127:S(2)=1624:S(3)=16 
47 rem 194 





479 
489 
4968 
508 
518 
520 


538 
540 


550 


560 


5768 


586 
598 


609 
619 
626 
630 
648 
655 
666 
6768 
680 
698 
708 
7168 
720 
738 


740 
758 


760 
778 
788 
798 


860 
810 
820 
836 
846 
850 


860 


F(0)=1271+SS:F(1)=1294+SS:F(2)=1791+S 
S:F(3)=1814+ss rem 222 
GOSUB 640:REM*** MAKE THE BOX *** 


srem 184 
GOSUB 1470:REM*** MAKE BINGO SPRITES 
{SPACE} *** rrem 186 
REM*** BLANK OUT THE FREE-BOXES *** 

trem 134 
FORI=0T03:POKE F(1I),1:POKEF(I)+1,1:NE 
xT zrem 42 


GOSUB 848:REM*** CHOOSE THE NUMBERS F 
OR THE CARDS *** srem 192 
REM*** PUT RED COVER-TOKEN ON FREE-BO 
XES *** srem 230 
FOR I=@T03:POKEF(I)-SS,160:POKEF(I)+1 
-SS,160:POKEF(I),8:POKEF(I)+1,8:NEXT 
trem 85 
FORCD=9T03:C(CD,2,2)=@:NEXT:REM SET C 
ENTER BOX TO ILLEGAL VALUE (FREE BOX) 
srem 168 
REM*** DRAW THE PASS LINE ***:rem 233 
FORLI=6T06 : POKE(1520+L1),64:NEXT LI 
trem 68 
REM*** START OF PLAY *** trem 214 
GOSUB 1100:REM*** GET THE NEXT NUMBER 
REM zrem 195 
GOSUB 1176:REM*** CHECK THE CARDS FOR 
A MATCH *** trem 58 
IF AU=0 OR AU=3 THEN 596:REM*** CHECK 





FOR AUTO BALL-FEED *** rrem 145 
GET A$:IF AS=""THEN 626 :REM*** WAIT 
(SPACE}POR NEXT BALL *** rrem 227 
GOTO 599 rrem 112 
REM *** BOX MAKER *** trem 211 
TO$=" B{2 SPACES}I{2 SPACES}N 

{2 SPACES}G(SHIFT-SPACE} 0 " :rem 211 
Al=176 :A2=96:A3=178:A4=174:GOSUB716:T 
1$=a$ trem 44 
A1=98 :A2=32:A3=98 :A4=98 :GOSUB710:T2S$= 
AS rrem 157 
Al=171:A2=96:A3=123 :A4=179:GOSUB710:T 
3$=AS rrem 38 
Al=173:A2=96 :A3=177:A4=189:GOSUB710:T 
A4S=AS trem 52 
GOTO752 trem 108 


AS=CHRS$ (A2)+CHR$(A3)+CHRS$(A2):rem 224 
AS=CHR$ (Al) +CHRS$(A2) +A$+A$+AS+A$+CHRS 


(A2)+CHRS (A4) trem 17 
AS=AS+"{7 SPACES}"+A$ zrem 160 
RETURN zrem 123 


PRINT CHR$(18)CHR$(31)TO$CHRS$(146)SPC 
(8) CHRS$ (18) CHRS (31) TOSCHRS (146) 

trem 
PRINT CHR$(144);T1$ trem 
FOR I=1T04:PRINTT2$:PRINTT3$:NEXT 

trem 111 
PRINTT2$:PRINTT4$: PRINT rem 16 
PRINT CHR$(18)CHR$(31)TOSCHRS$(146)SPC 
(8) CHRS (18)CHR$(31)TO$CHR$ (146) 

rem 168 
PRINT CHRS$(144);T1$ trem 244 


FOR I=1T04:PRINTT2$:PRINTT3$:NEXT 


164 
249 


srem 106 
PRINTT2$:PRINTT4$; trem 127 
RETURN zsrem 123 
REM*** CHOOSE THE CARD NUMBERS *** 

rem 84 


REM*** FIRST ZERO THE CALLED NUMBER A 
RRAY *** rrem 19 
FOR CL=0T0O4: FORNN=0T014:N(CL,NN)=0:NE 
XT:NEXT trem 25 
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870 
880 
890 
998 


918 
920 


930 
940 


950 
960 
9708 


986 

990 

106086 
1616 
1026 
1630 
1046 
1650 


1066 
1676 
1080 
16908 


1106 


1116 
1126 


1138 
1146 


1156 
1168 
1176 


1186 
1196 
1268 


1216 
1228 


12308 
1246 
1256 


1268 


1276 
1286 
1296 


1368 


1310 
1326 
1336 
13408 
1350 
13608 


CD=@6{2 SPACES}:REM*** CARD LOOP *** 
rem 1 
CL=6{2 SPACES}:REM*** COLUMN LOOP *** 
rrem 190 
FOR I=@T04:C(CD,CL,1)=@:NEXT:REM*** Z 
ERO COL OF NUMBERS ON CARD ***:rem 32 
RN=6{2 SPACES}:REM*** ROW LOOP *** 
zrem 242 
Z=INT(RND(@)*15)+1+15*CL rrem 8 
REM*** TEST FOR THE NUMBER IN USE *** 


zrem 208 
J=0 trem 83 
IF C(CD,CL,J)=Z THEN 916 :REM*** NUMB 
ER HAS BEEN USED *** rrem 226 
IF J<RN THEN J=J+1:GOTO 940 :rem 191 
c(CcD,CL,RN)=Z trem 216 


REM*** PRINT NUMBER IN THE BOX *** 


NS=STR$(Z) 
LN=LEN (NS) 
FORQ=1TOLN-1 
SN=S(CD)+CL*3+RN*80+Q+(3-LN) 
PN=ASC(MID$(N$,Q+1,1)) 
POKE SN, PN 
NEXTQ 
IF RN<4 THEN RN=RN+1:GOTO 918 
iq trem 122 
IF CL<4 THEN CL=CL+1:GOTO 890:rem 79 
IF CD<3 THEN CD=CD+1:GOTO 880:rem 54 
RETURN srem 169 
REM *** SELECT THE NEXT BALL NUMBER* 
+e rrem 110 
GOSUB 1736 :REM*** FIRST CHOOSE THE 
{SPACE}LETTER *** rem 33 
REM*** NEXT THE NUMBER *** trem 146 
NU=INT(RND(@)*15) :NM=NU+1+NC*15 
trem 508 
REM*** HAS IT ALREADY BEEN USED? *** 
srem 178 
IF N(NC,NU)=1 THEN 1110:REM*** YES-G 


rrem 49 
srem 189 





ET ANOTHER *** trem 221 
N(NC,NU)=1 srem 52 
RETURN rem 168 
REM*** PRINT THE NUMBER ON THE BIG B 
INE AA 4 trem 75 
N1=INT(NM/16) :N2=NM-N1*16 srem 182 
IF N1=OTHEN N1=-16 trem 197 


POKE 1282,L(NC):POKE1283,N1+176:POKE 
1284,N2+176 trem 113 
POKEV+44 , CO(NC) trem 124 
REM*** CHECK FOR NUMBER ON THE CARDS 


Ads trem 158 
NN=O :rem 207 
BO=0 rrem 197 
CD=6{4 SPACES):REM *** CARD LOOP *** 

srem 42 
CR=0{4 SPACES):REM *** ROW LOOP *** 

trem 23 
IF C(CD,NC,CR)<>NM THEN 1396 :rem 3 
IF AU>1 THEN{2 SPACES}2276 rem 89 


NN=1 :REM*** FOUND A MATCH *** 
srem 26 


REM*** PUT THE RED COVER-TOKEN ON TH 


E NUMBER *** trem 205 
P1=S(CD)+CR*8O+NC* 3+1 rrem 117 
POKE P1+SS,8 trem 171 
POKE P1+1+SS,8 rem 8 
POKE P1+1,N2+176 srem 73 
POKE P1,N1+176 trem 237 
GOSUB 1896 :REM*** RING THE CHIME ** 
a trem 173 
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1376 


1386 
1396 


14806 
1416 


1426 
1436 


1446 
1456 
1466 
1478 
1486 


1496 
1506 


1516 


1520 
1536 
1548 


1556 
1568 


1576 
1586 
1598 
1608 
1616 
1626 
1638 
1649 
1656 
1668 
1676 
1688 
1696 
1788 
1716 


1726 
1736 


1748 
1756 
1768 
1776 
1786 


1798 


GOSUB 2006:REM*** CHECK FOR A WINNER 


Like rem 128 
GOTO1469 rem 262 
IF CR<4 THEN CR=CR+1:GOTO1276 

rem 144 
IF CD<3 THEN CD=CD+1:GOTO126@:rem 92 
IF NN=OTHEN GOSUB 1950:REM*** NO MAT 
CH-SOUND THE GONG *** zrem 194 
Y¥(NC)=230 rem 212 
POKE V+1+NC*2,Y(NC):REM SET INIT Y 

rem 191 


IF BO=@ THEN RETURN:REM*** NO WINNER 
- GET NEXT BALL *** zsrem 86 
GET A$:IF AS$=""THEN 1450:REM*** WINN 
ER-WAIT FOR A RESTART *** trem 83 
POKE V+21,6:RESTORE:CLR:GOTO15@ 


trem 188 

REM*** MAKE THE BINGO SPRITES *** 
srem 68 

REM*** ZERO THE SPRITES MEMORY *** 
trem 209 
FORI=0TO3 trem 65 


POKE 251,1*64:POKE252,57:POKE253, 63: 
POKE 254,00:SYS 28672:NEXTI :rem 92 
POKE 251,00: POKE252,58:POKE253,63:PO 
KE 254,88:SYS 28672 rem 31 


REM*** SET UP TO ZERO SOUND *** 

rem 165 
POKE 251,00:POKE252, 212: POKE253, 24:P 
OKE 254,06 trem 4 
REM*** READ IN THE BIG BALL SPRITE * 
bas srem 2 
FORI=@T04:FORJ=22T046:READ SD:rem 69 
POKE (14592+1*64+J),SD:NEXT:NEXT 


zrem 131 
FOR I=@T063:READ SD:POKE 14912+1,SD: 
NEXT rem 125 
POKE V+21,63:REM ENABLE THE SPRITES 

rrem 76 
FORI=9TOS zrem 68 
POKE 2648+1,228+1 zrem 168 


REM*** SET UP THE SPRITES ***:rem 68 
POKE V+39+I,CO(I):REM*** SET THE SPR 


ITE COLOR *** trem 238 
X(I)=145+1*12 srem 148 
¥(I)=230 rrem 144 


X(5)=156:Y(5)=83:REM*** LARGE SPRITE 

LOCATION *** trem 249 
POKE V+I*2,X(I):REM*** SET INITIAL X 
-POSITION *** trem 74 
POKE V+1+I*2,Y(I):REM*** SET INITIAL 


aes trem 7 
NEXTI rem 87 
POKE V+23,32:POKE V+29,32 rem 92 


REM*** READ IN THE BINGO SONG *** 


trem 226 
FORI=6T021:READFL(I),FH(1),DU(I) :NEX 
T trem 26 
RETURN trem 170 


NC=INT(RND(1)*5):REM*** SELECT THE B 
ALL LETTER *** srem 64 
YM=INT(RND(@)*13):IF YM<5 THEN YM=5: 
REM*** GET THE MAXIMUM HEIGHT *** 


trem 183 
J=0 trem 132 
Y=If2-2*YM*I+230 trem 161 


POKE (V+NC*2),X(NC) :POKE(V+1+NC*2),I 
NT(Y) rrem 104 
IF ¥<=132THEN RETURN: REM*** BALL WEN 
T OVER PASS LINE *** trem 228 
IF J<2*YM THEN J=J+1:GOTO1760:rem 133 


1868 
1818 
1826 


18306 
1848 


1859 


1866 
1878 
1888 
1890 
1986 


1916 
1926 
1938 
1946 
1956 
1966 


1976 
1986 


1996 
2008 


2016 
2628 


2030 
2646 


2050 
2068 


2078 
2688 


2696 
2109 
2116 
2126 
2136 


(2146 
2158 
2160 
2178 
2180 
2196 
2200 


2210 


2220 
2230 
2246 
2256 


2260 
2270 


GOSUB1830:REM*** MAKE THE BALL PLOP 
{SPACE}SOUND *** trem 13 
GOTO1739:REM*** GET NEXT BALL *** 


srem 34 
REM*** SOUND OF THE BALL PLOP *** 

trem 0 
SYS 28672 srem 212 
POKESS , 255: POKESS+1, 93: POKESS+5 , 2 

trem 58 
POKESS+22,184:POKESS+23,1:POKESS+24, 


79: POKESS+4,129 trem 97 
POKESS+24,08 zsrem 145 
RETURN rem 176 
REM*** CHIME SOUND *** trem 160 
SYS 28672 rem 218 
POKE SS+1,255:POKE SS+5,9:POKESS+15, 


225:POKE SS+24,15 trem 46 
POKESS+4, 21 rrem 142 
FORTT=1T030G:NEXT: POKESS+4, 20:rem 116 


RETURN trem 173 
REM*** SOUR BONG SOUND *** :rem 166 
SYS 28672 trem 215 
POKE SS+1,55:POKE SS+5,9:POKESS+15,2 


trem 208 
trem 148 


5:POKE SS+24,15 
POKESS+4, 21 


FORTT=1T030@:NEXT: POKESS+4, 20:POKE S 
S+24,6 trem 118 
RETURN rrem 179 
REM*** ROUTINE TO LOOK FOR A WINNER 
{SPACE} *** trem 155 
Al1=3:A2=80:A3=0:A4=0 rrem 46 


WI=NC:GOSUB 2120:REM*** CHECK ROWS * 
Ad srem 116 


A1=86:A2=3:A3=0:A4=0 rem 48 
WI=CR:GOSUB 2120:REM*** CHECK COLS * 
RY zrem 96 


IF NC<>CR THEN 2080:REM*** IS # ON M 


AJOR DIAGONAL? *** srem 92 
A1=0:A2=3:A3=80:A4=0 srem 51 
GOSUB 2126 rrem 14 


IF NC<>(4-CR) THEN RETURN:REM*** IS 
{SPACE}# ON MINOR DIAGONAL? *** 


zrem 51 
A1=0:A2=3:A3=0:A4=80 rem 54 
GOSUB 2120 trem 8 
RETURN zrem 164 
Wd=0 trem 211 
WM=S (CD) +WI*A1+WO*A2+WI*A3+(4-WI) *A4 
+1 trem 133 
WP=PEEK (WM) trem 197 
IF WP<128THENRETURN srem 228 
W(Wd)=WM + SS trem 196 
Wd=WJ+1:IF WJ<=4THEN2130 rem 177 
REM*** CHANGE WINNERS COLOR *** 

trem 246 


FOR WI=0T04:FORQ=OTO1 : POKEW(WJ)+Q,7: 
NEXT: NEXT: BO=1 trem 7 
REM*** PLAY THE BINGO SONG *** 


rem 97 
POKE54296,15:POKE54277,10:POKE54278, 
16:REM SET VOL,ATT/DEC, SUS/REL 

trem 211 
FORI=@T021:POKE54272,FL(1I) :POKE54273 
,FH(L):POKE54276,33 rem 243 
FORT=0TO DU(I)*4:NEXT: POKE5S4276,0:NE 
xT srem 98 
REM*** CHANGE WINNERS COLOR *** 

trem 243 
FOR WJ=6T04; FORQ=@TO1 : POKEW(WJ)+Q,6: 


NEXT: NEXT: BO=1 srem 3 
RETURN trem 176 
REM JOYSTICK TOKEN ROUTINE ‘trem 198 


2280 
2290 
2306 
2310 
2320 
2330 
2346 
2350 
2368 
2378 
2380 
2398 


2400 
2416 


2420 
24368 


2446 


2458 
2460 
2478 
2480 
2490 
2580 
2516 
2520 
2536 
2546 
2556 
2560 
2570 
2586 
2590 
26080 
2610 


2620 


2630 


2648 


2658 


2660 
2676 


2689 
2690 


CM= F(CD) trem 183 
OC=PEEK(CM):REM OC=OLD COLOR:rem 237 
POKE CM,5:POKE CM+1,5:REM COLOR IT G 


REEN trem 70 
KB=PEEK(D@):REM READ THE KEYBOARD CO 
NTROL REG trem 229 
POKE DG, 255: PD=PEEK(D1) trem 48 
J@=-( (PDANDB8) =) trem 90 
J1=-((PDAND2)=0) rrem 86 
J2=-((PDAND4)=3) trem 98 
J3=-((PDAND1)=0) zrem 89 
FB=-((PDAND16)=6) rrem 155 


POKE D®,KB:REM RESTORE KEYBOARD 

trem 188 
IF (JO+J1+324+33+FB)=0 THEN 2560 

trem 57 
IF FB=1THEN 2496 trem 73 
CCSCM+(JO-J2)*3+(J1-33)*80:REM COMPU 
TE NEW POSITION trem 227 
FR=INT((CC-S(CD)-SS) /48) trem 116 


XO=S(CD)+SS+FR*40:X1=X6+14:REM MIN,M 
AX H=-POSITIONS FOR CARD trem 69 


IF CC>X1 OR CC<x@ OR FR>8{2 SPACES}O 
R FR<® THEN 2560:REM TEST IF OUTSIDE 
BOX srem 212 
REM VALID NEW POSITION-MOVE THE CURS 
OR srem 16L 
POKE CM,OC:POKE CM+1,0C trem 92 
CM=CC:REM MOVE THE CURSOR trem 52 
GOTO2296 trem 212 


REM ACT ON FIREBUTTON-WE MUST CHECK 
{SPACE}IF THE CURSOR IS WITHIN A BOX 
AND IF :rem 227 
REM IT IS, IS THE NUMBER THE CORRECT 
ONE. rem 89 
BO=PEEK(CM-SS ) -48:B1=PEEK(CM-SS+1)-4 
8 srem 161 
IF BO=Nl AND B1=N2 OR BO=N1+128 ANDB 


1=N1+128 THENGOTO1 290 zrem 26 
REM FIRE BUTTON PRESSED WHEN NOT ON 
{SPACE} BOX trem 111 


POKECM, OC: POKECM+1,0C:GOSUB 195@:REM 
SOUR GONG srem 118 
NN=1:GOTO 1390:REM GET NEXT CARD 
trem 189 
REM LOOP TILL JOYSTICK IS ACTIVE 
trem 232 
FOR I=@T020:NEXT srem 233 
POKE CM,OC:POKE CM+1,0C trem 95 
FOR I=@6T026:NEXT trem 235 
GOTO 2300 rem 198 


DATA 169,60,165,254,145,251, 200,196, 
253,208,249,96,252,0,3,255 :rem 227 
DATA 8,3,3,128,7,57,128,7,35,128,7,5 
7,128,3,3,128,3,255,0,8,252,252,0 
rrem 37 
DATA3,255,0,3,3,128,7,207,128,7,207, 
128,7,207,128,3,3,128,3,255,9,0,252 
trem 183 
DATA252,0,3,255,0,3,25,128,7,25,128, 
7,41,128,7,49,128,3,57,128,3,255,0 
rem 147 


DATAG, 252, 252,0,1,131,8,3,49,128,6,1 
21,128,6,127,128,6,113,128,3,57 

trem 239 
DATA128,3,131,9,9,252 rem 32 


DATA252,6,1,131,0,3,57,128,6,124,128 

16,124,128,6,124,128,3,57,128,3,131 
rrem 184 

DATA 0,6, 252 trem 59 


DATA 6,126,0,1,255,128,7,255,224,31, 
255,248,63,255,252,63,255,252,127,25 
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5 :rem 11 

2708 DATA 254,126,6,36,248,6,31,248,8,31, 

248,8,31,120,6,36,127,255,254,63,255 

rem 166 

2718 DATA 252,63,255,252,31,255,248,7,255 

1224,1,255,128,6,126,0,6,0,0,9,5,9,8 

rem 157 

2728 DATA 38,43,39,38,43,39,183,45,39,183 

45,44,183,45,64,113,38,46,113,38,42 

irem 238 

2730 DATA 38,43,32,38,43,36,38,43,47,64,3 
4,50,64,34,54,113,38,37,113,38,39 

zsrem 75 

2748 DATA 113,38,51,64,34,57,83,32,53,168 
125,72, 204, 28, 54,83,32,51,64, 34,62 

trem 121 

2758 DATA 64,34,75 trem 125 


Tank Mania 


(Article on page 102.) 





BEFORE TYPING... 
Before typing in programs, please refer to “How 
To Type COMPUTES Gazette Programs,” “A 
Beginner's Guide To Typing In Programs,” and 
“The Automatic Proofreader” that appear before 
the Program Listings. 





Program 1: Loader 
4 PRINT" (CLR}":POKE56, 28: POKE52, 28:CB=716 


8: zrem 116 

5 FORI=7168T07679:POKEI , PEEK(I+25600) :NEX 

T: POKE36869, 255 rem 119 

6 READA: IFA=-1THEN9 srem 168 
7 FORI=@TO7 : READB: POKECB+A*8+1,B:NEXT 

rem 93 

8 GOTO6 rem 167 

9 POKE36878,15 rrem 10 

1@ FORL=6T021: POKE38408+L, C: POKE38905-L,C 


: POKE38400+L+1, 4: POKE38995-L-1,08 


rem 239 

11 POKE7680+L, 170: POKE7680+L+1,7:POKE8185 
-L, 170: POKE8185-L-1,1 rem 4 

12 POKE36875,128+6*L:C=(C-(C<7) )*-(C<7) 21 
FC=1THENC=4 rem 122 

13 NEXT: IFK=1THENRETURN trem 52 


14 PRINT"{6 DOWN}{6 SPACES}{RVS}{GRN}CCCC 
CCCCCCC": PRINT" {6 SPACES} {RVS}{GRNJTAN 
K MANIA!" :rem 29 
15 PRINT"{6 SPACES} {RVS}{GRN}CCCcccccccc" 
zrem 2008 
20 PRINT"{3 DOWN}{RVS}{BLU}[5 SPACES}PRES 
S ANY KEY" rrem 245 
21 A$="":GETAS$:IFAS$=""THEN21 zrem 9 
22 PRINT" (CLR} {DOWN}":PRINT" {RVS} {YEL}RIG 
HT JOYSTICK (RED)";"{OFF]{PUR} A" 
:rem 156 
23 PRINT" {DOWN} {BLK}G";"{RVS}{YEL] LEFT J 
OYSTICK";"{RVS}(BLUE) {DOWN} {BLU}";" 
{OFF}7{RVS}{YEL} BLOCKADES":PRINT" 

















{powN}.{RvS} MINES" :rem 122 
24 PRINT"(2 DOWN} {RVS]{CYN}{4 SPACES}PRES 
S ANY KEY " rrem 164 
25 AS GETAS : IFA$=""THEN25 :rem 17 
26 PRINT"{CLR}" rrem 264 
27 K=1:GOSUB9: POKE7762, 32: POKE8163, 32: POK 
£36869, 249 :rem 238 
28 PRINT"{HOME}(2 DOWN}{2 SPACES}JUST A F 
EW MOMENTS" trem 252 
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30 POKE198,5:POKE631, 78: POKE632, 69: POKE63 
3,87: POKE634,13:POKE635,131:END 


rem 225 

1608 DATA G,72,236,126,55, 239,124, 56,24 
rem 126 

1661 DATA 1,63,63,30,118,118,36,63,63 

rem 11 

1062 DATA 2,24,56,124,239,55,126, 236,72 
trem 124 

1993 DATA 3,24,24,98,126,102,126,126,66 
srem 112 

1885 DATA 5,66,126,126,162,126,908, 24,24 
zrem 116 

1006 DATA 6,18,55,126, 236, 247,62, 28, 24 
rem 83 
1687 DATA 7,252,252,120,110,110,126,252,2 
52 zrem 39 

1088 DATA 8,24,28,62,247,236,126,55,18 
:rem 87 


1809 DATA 9,6,6,12,28,56,48,0,0 :rem 225 
1616 DATA 106,6,6,48,56,28,12,0,0 trem 1 
1011 DATA 11,6,24,24,24,24,24,0,0 :rem 45 
1012 DATA 12,6,0,6,62,62,0,86,0 srem 145 
1616 DATA 16,0,112,126,162,32,48,48,0 


rem 6 
1617 DATA 17, 228,18,37,68,36,18,33,198 
rrem 98 
1018 DATA 18,6,48,48,32,1062,126,112,0 
trem 16 
1919 DATA 19,68,176,145,06,34,85,137,129 
trem 138 
1626 DATA 20,153,96,60,255,255,60,98,153 
zrem 167 
1621 DATA 21,129,137,85,34,0,145,178,68 
srem 124 
1622 DATA 22,0,14,126,102,4,12,12,6 
srem 142 
1623 DATA 23,198,33,18,36,68,37,18,228 
trem 92 
1624 DATA 24,06,12,12,4,1062,126,14,0 
rrem 146 


1046 DATA 46,0,9,66,36,24,36,66,0 :rem 79 
1655 DATA 55,126,255, 255,255,255, 255,255, 
126,-1 rrem 19 
Program 2: Main Program 
1 C=22:R=22:S=7680:A=30729:DD=37154: P1=37 
151:P2=37152:SL=5:DA=37136:REM SL=SKILL 
LEVEL srem 206 
2 POKE36879, 29:T=3:CY=4:CE=6:CA=7:CS=7:CQ 
CM=8:X=-1 srem 156 
36878:S1=V-2:S2=V-1:DIMDC% (2,2) ,OC%(2 
,2),U(1),0(1),Q(1),D(1),E(1) rrem 127 
4 FORI=@6T02:FORJ=O6TO2:X=X+1:DC%(I,J)=X:0C 





$(I,3)=X+16 :NEXTJ, I rrem 193 
5 DEFFNA(Z)=S+X+C*Y : DEFFNB(Z)=PEEK(FNA(Z) 
) :DEFFNR(Z)=INT(RND(1)*Z) trem 66 


6 POKEV-9, 255:PRINT" {CLR} {BLK}":X=S+A: FOR 
I=XTOX+505 : POKEI , T: NEXTI : GOSUB16O 








rrem 163 
7 POKE36879, 29: FORI=1T03+2*SL:X=FNR(C) :Y= 
FNR(R) :rem 132 
8 POKEFNA(@),46:POKEFNA(®)+A,CA:NEXT 
z:rem 167 
11 X=FNR(C):Y=FNR(R):IFFNB(@)<>32THEN11 
rem 98 
12 D(@)=X:E()=¥:Q(8)=FNA(G) :U(G)=-1 
=FNR(3)-1 
13 POKEFNA(G) ,DC%(U(G)+1,0(8)+1) : POKEFNA( 
@)+A,CY :rem 143 
14 X=FNR(C):Y=FNR(R) :IFFNB(@)<>32THEN14 


srem 96 


74 





D(1)=X:E(1)=¥:Q(1)=FNA(@) :U(1)=1:0(1)= 
FNR(3)-1 em 135 
POKEFNA(@) ,DC$(U(1)+1,0(1)+1) : POKEFNA( 
9) +A, CE: FORI=1 T0500 :NEXT :rem 9 
ONW+1GOSUB75, 41: IFFBTHENX=D(W) :Y=E(W): 
PX=U(W) : PY=0(W) :GOTO46 rrem 4 
B=@:F=0: IFJ3THENB=1 
IFJ2THENB=-1 
IFJ1THENF=1 
IFJOTHENF=-1 
IFB=QANDF=OTHEN B=U(W):F=0(W) 
U(W)=B:0(W)=F 
D(W)=D(W)+U(W) :E(W)=E(W)+0(W) 
X=D(W) :Y=E(W) :J=FNB(@) : 1FJ=32THEN35 
rem 5 
IFJ> 54THENX=X-U(W) :D(W)=D(W)-U(W) : ¥=Y- 
O(W):E(W)=E(W)-O(W) :GOTO35 rrem 64 
GOTO 6 rrem 6 
POKEQ(W) , 32: POKEQ(W)+A,T:Q(W)=FNA(@) :P 
OKEQ(W) , DC%(U(W)+1,0(W)+1) : POKEQ(W)+A, 
CY+2*W trem 12 
J=@: IFW=1THENW=6:GOTO18 rrem 126 
W=1:GOTO18 trem 12 
P=PEEK (DA) :J@=-( (PAND4)=0) :J1=-((PAND8 
)=0):32=~((PAND16)=0) :J3=-((PAND2)=0) 











rem 56 
FB=-((PAND32)=0) : RETURN rrem 9 
Z=PX*PY: POKEV,8:IFZ=1THENJ=19 :rem 71 
IFZ=-1THENJ=9 trem 222 
IFZ=OANDPX=8THENJ=11 zrem 194 
IFZ=OANDPY=OTHENJ=12 zrem 197 
FORI=1T010:X=X+PX: Y=Y+PY : POKES2, 236-I 

srem 35 
IFI<>1THENPOKEZ,32:POKEZ+A,T :rem 225 
B=FNB(0):IFB=32THEN5S trem 134 
IFB<>55THEN57 srem 184 
IFB=55THENI=16:NEXTI : POKEV, @:GOTO19 

rem 177 
I=10:NEXTI:GOTO69 zrem 238 


Z=FNA(@) :POKEZ,J: POKEZ+A,CM:NEXTI 


srem 64 
POKEZ, 32: POKEZ+A, T: POKEV, 6: GOTO19 
zrem 47 
POKES2, 230: SC=X-1: IFSC<@THENSC=6 
rem 155 
FC=X+1 : IFFC>CTHENFC=C srem 236 
SR=Y-1: IFSR<OTHENSR=0 trem 28 
FR=Y+1:IFFR> RTHENFR=R srem 58 


FORX=SCTOFC: FORY=SRTOFR: J=0C$% (X-SC, Y-S 


R) :rem 122 
POKEFNA(@),J:POKEFNA(@)+A,CQ:NEXTY,X 
:rem 167 


POKES1, 226: FORJ=15TOOSTEP-1 : POKEV,J:FO 
RJ1=1T050:NEXTJ1 :NEXTI rrem 88 
POKEV, 0; FORX=SCTOFC : FORY=SRTOFR: POKEFN 
A(@),32:POKEFNA(@)+A,T:NEXTY,X:rem 174 
IFPEEK(Q(1) )=32ANDPEEK(Q(@) )=32THENWC= 
WC+1:WH=WH+1:A$="YOU GOT EACH OTHER!": 


GOTO72 rrem 73 
IFPEEK(Q(0))=32THENAS="RED IS REARRANG 
ED1|":WC=WC+1:GOTO72 rrem 83 
IFPEEK(Q(1))=32THENAS$="BLUE IS TANK DU 
ST1" :WH=WH+1 :GOTO72 zrem 54 
GOTO18 zrem 18 


POKEV-9, 240:PRINT"{CLR}{3 DOWN}" 
INT"{2 DOWN}SCORE: BLUE";WC;" 

rrem 155 
PRINT"(3 DOWN}PRESS ANY KEY TO STOP":F 
ORI=1T040:GETAS : IFA$<>""THENI=490 :NEX 
TI:END zrem 75 
NEXTI:GOTO6 rrem 156 














75 POKEDD, 127: P=PEEK(P2)AND128:J3=-(P=0): 
POKEDD, 255 em 254 
76 P=PEEK(P1):J1=-((PAND8)=@) :J2=-((PAND1 
6)=9) rem 51 
77 J@=-((PAND4)=@) :FB=-((PAND32)=6) :RETUR 
N rrem 149 
108 FOR RA=OTOSL*10:POKES+INT(RND(1)*484) 
,55:NEXT trem 167 
101 FOR L=@ TO 21 trem 56 
103 POKE S+L,55 trem 35 
104 POKE S+(22*22)+L,55 rrem 146 
105 NEXT L trem 33 
106 FOR U=0 TO 484 STEP 22 trem 35 
107 POKE S+U,55 rrem 48 
108 POKE S+21+U,55 trem 191 
109 NEXT U:RETURN rrem 72 
Variable Storage 
(Article on page 108.) 
Program I: variable utility 
44446 REM(3 SPACES}DUMP... trem 164 
44441 REM***START WITH GOTO 44444:rem 106 
44443 END:REM PROTECT SUBROUTINE :rem 41 
44444 ZB=PEEK(47)+256*PEEK(48)-7:ZA=PEEK( 
45 )+256*PEEK(46) zrem 185 
44456 PRINT"STRINGS &{2 SPACES}VARIABLES: 
SPRINT AIR III II IR ik tH 
srem 114 
44460 FOR ZZ=ZA TO ZB STEP 7 trem 39 
44465 IF PEEK(ZZ)>127 THEN GOSUB 44716:GO 
10445206:REM INT VAR rrem 171 
44470 IF PEEK(ZZ+1)<128 THEN GOSUB 44543: 
GOTO 44520:REM FP VAR zrem 177 
44475 REM*****STRING*#*# AHA HR AAA VARTABL 
E rrem 39 
44480 GOSUB44485 :GOT044526 rrem 255 
44485 PRINTCHRS (144) CHR$(PEEK(ZZ) )CHRS$(PE 
EK(ZZ+1)-128)CHR$(36)CHRS$ (61); 
srem 76 
44499 ZY=PEEK(ZZ+3)+256*PEEK(ZZ+4) :ZX=PEE 
K(2Z+2):REM STRINGADDRESS AND LENGT 
H rrem 56 
44495 IF ZY=0 THEN 44516 trem 239 
44506 FOR Z0=1T0ZX:PRINTCHR$ (PEEK(ZY));: 
Y=ZY+1:NEXTZ0 rrem 234 
44510 PRINT: RETURN rrem 165 
44520 NEXT2Z zrem 242 
44525 GOSUB 448@5:REM DO ARRAYS NOW:rem @ 
44530 PRINT: PRINTCHR$(144)"....ALL DONE": 
END rrem 75 
44540 REM***FLOAT PT**** eee HX AVARTABLE 
:rem 187 
44543 IFPEEK (ZZ)=90 AND(PEEK(ZZ+1)=65 OR 
(SPACE} PEEK(2Z+1)=66)THEN RETURN 
rrem 148 
44545 PRINTCHRS (144)CHR$(PEEK(ZZ))CHR$(PE 
EK(ZZ+1))CHR$(61); 
44556 Z1=2t(PEEK(ZZ+2)-129) 
44560 22=128:23=256:24=1 
44576 Z5=PEEK(ZZ+3): IFZ5>=128 THEN Z5=Z5 
-128:24=-1 rrem 123 
44586 29=214+25*Z1/Z2+PEEK(ZZ+4)*Z1/Z2/Z3+ 
PEEK(2Z+5)*2Z1/22/2Z312+PEEK(ZZ+6)*Z1 
/22/23%3 zrem 78 
44590 PRINTZ9*Z4 em 222 
44660 RETURN zrem 222 
44700 REM*** INTEGER***#* #4 *e# eA AVARTABL 
E trem 43 
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44716 


44728 
44730 
44740 
44750 
44769 
44800 


44805 


44806 


44816 
44815 
44826 
44825 
44828 
44829 


44830 
44846 


44859 


44860 
44870 
44886 


44890 
44988 


44918 
44920 


44936 


44949 
44959 
44969 
44979 


44989 
45008 


45019 
45920 


450308 


45048 
45058 
45860 
45078 


45080 
45108 
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PRINTCHRS (144) CHRS$(PEEK(ZZ)-128)CHR 
$ (PEEK(2Z+1)-128)CHR$(37)CHR$(61); 


zrem 12 
24=1:2Z7=PEEK(2Z+2) :Z8=PEEK(2ZZ+3) 

rem 29 
IF 27 >127THENZ7=255-27 :Z8=256-28:Z 
4= -1 trem 25 
29=Z7*256+Z8:REMNOTE REVERSE HIBYTE 


-LOBYTE SEQUENCE trem 114 
PRINTZ9*2Z4 trem 220 
RETURN rem 229 
REM*** ARRAY *## eek ee Ae ROE AVARTABLE 
s rrem 246 
IFZQ=@THENZA=6:GOSUB4455: ‘A%=6:GOS 





UB44720:ZR=2:2ZQ=2:2ZX=2:ZY=2:Z0=2 

trem 84 
REM ABOVE DUMMIES NEEDED TO STABILI 
ZE(3 SPACES}POINTER TO ARRAYS 

rrem 240 
2Z=PEEK (47)+256*PEEK (48) : IFZZ=PEEK( 
49)+256*PEEK(5@)THEN RETURN :rem 32 
PRINT"SPACEBAR WHEN READY({3 SPACES} 
FOR ARRAYS" :WAIT197, 32 rrem 25 
IF PEEK(2Z+4) <>1THENGOSUB45110:GOTO 
44820:REM MULTI-D ARRAY trem 125 
IF PEEK(ZZ)>127 THEN GOSUB 44900:GO 
T044826:REM INT ARRAY :rem 69 
IF PEEK(ZZ+1)>127 THEN GOSUB 45916: 
GOT044820:REM STRING ARRAY :rem 137 
REMC PLOAT PD er td CORA RRAY 

trem 82 
ZQ=ZZ:Z2Z=22+7 trem 224 
FOR ZR=0 TO PEEK(2Q+6)+256*PEEK(ZQ+ 
5)-1:REM**DIM trem 70 
PRINTCHRS (144) CHR$ (PEEK(ZQ)) CHR$ (PE 
EK(ZQ+1) )CHR$ (40) ZRCHR$ (41) CHR$ (61) 


i rem 204 
2Z=ZZ-2:GOSUB44550:ZZ=22+2 srem 2 
Z2sZ2+5 trem 12 


NEXTZR: [FZZ=PEEK(49)+256*PEEK (50) TH 


EN RETURN trem 108 
GOTO44820 trem 68 
REM**** INTEGER *##&* ARR KARRAYS 
trem 181 
ZQ=2Z: ZZ=2Z+7 trem 223 


FOR ZR=@ TO PEEK(ZQ+6)+256*PEEK(ZQ+ 
5)-1:REM**DIM trem 69 
PRINTCHRS (144) CHR ( PEEK(ZQ)-128)CHR 
$ ( PEEK (ZQ+1)-128) CHR$ (37) CHR$ (46); 


trem 251 
PRINTZRCHRS (41) CHRS$ (61); srem 233 
ZZ=ZZ-2:GOSUB447 26: Z2Z=Z22+2 trem 1 
ZZSZZ+2 trem 9 


NEXTZR: IFZZ=PEEK (49) +256*PEEK(50)TH 


EN GOTO 44536 srem 197 
RETURN trem 233 
REM**#*#STRING*#* HARA HMR ARRAYS 
rem 88 
2Q=22:22=Z2+7 trem 215 


FOR ZR=@ TO PEEK(ZQ+6)+256*PEEK(ZQ+ 
5)-1:REM**DIM trem 61 
PRINTCHR$ (144) CHR$ ( PEEK(ZQ) ) CHR$ (PE 
EK(ZQ+1)-128) CHRS$ (36) CHRS$ (40); 


srem 42 
PRINTZRCHR$(41)CHRS$(61); — :rem 225 
22=22-2:GOSUB44496:22=Z22+2 srem 253 
Z2=ZZ+3 trem 2 


NEXTZR: LFZZ=PEEK (49) +256*PEEK(50) TH 


EN GOTO 44536 trem 189 

RETURN trem 225 

REM* *MULTI-D# A RRR RRR RAK R ER KARRAYS 
rrem 168 


45118 


2X=2:ZY=2: PRINTCHRS (43) PEEK(2Z+4)"D 
IMENSIONALARRAY:":PRINTTAB(5); 
srem 16 





45120 IF PEEK(ZZ)<127THENPRINTCHRS (PEEK (Z 
Z));:GOTO45146 srem 111 
45130 PRINTCHRS (PEEK(ZZ)-128) ; :ZX=1 
trem 99 
45148 IFPEEK(ZZ+1)=0THEN45170 :rem 176 
45145 IFPEEK(ZZ+1)=128THEN ZY=1:GOTO45170 
rem 180 
45150 IF PEEK(ZZ+1) <127THENPRINTCHRS (PEEK 
(ZZ+1));:GOTO45178 trem 45 
45160 PRINTCHRS (PEEK(ZZ+1)-128) ; :ZY=1 
srem 195 
45170 IF ZX=1 AND ZY=1THENPRINT"$"; :GOTO4 
5198 — rrem 122 
45180 IF ZY=1 THENPRINT" rrem 17 
45190 PRINTCHRS (48); trem 129 
45208 Z29=PEEK(Z2+4) rrem 84 
45210 FORZ8=Z9TO1STEP~1:Z7=PEEK(ZZ+4+2*28 
)+( PEEK (2ZZ+4+2*Z8-1))*256-1l:rem 254 
45220 PRINTZ7; trem 86 
45230 IFZ8=1THENPRINTCHRS (41) :GOT045250 
trem 115 
45248 PRINTCHRS (44); :NEXTZ8 trem 140 
45258 PRINT rem 141 
45268 ZZ=ZZ+PEEK(ZZ+2)+PEEK(ZZ+3)*256:1F 
{ SPACE }ZZ=PEEK (49) +256*PEEK(58) THEN 
44530 trem 107 
45276 RETURN trem 226 
Program 2: 
Variable Utility, Condensed Version 
44443 END:REM MINIDUMP FPVAR & $ :rem 36 
44444 ZB=PEEK(47)+256*PEEK(48)-7 : ZA=PEEK( 
45 )+256*PEEK(46) :rem 185 
44460 FORZZ=ZATOZBSTEP7 rrem 39 
44476 IFPEEK(ZZ+1) <128THENGOSUB44543 :GOTO 
44526 rrem 20 
44488 GOSUB44485:GOT044520 srem 255 


44485 


PRINTCHRS (144) CHRS ( PEEK(2ZZ))CHR$ (PE 
EK(ZZ+1)-128)CHRS$(36)CHR$ (61); 





srem 76 
44496 ZY=PEEK(Z2Z+3)+256*PEEK(2Z2Z+4) :ZX=PEE 
s K(ZZ+2) trem 168 
44495 IFZY=OTHEN44516 rrem 236 
44500 FOR 2S MOaR ERENT OURS (GLEN Cea 
Y=ZY+1 :NEXTZO trem 234 
44510 PRINT: RETURN rrem 165 
44520 NEXTZZ trem 242 
44530 END trem 215 
44543 IFPEEK(2ZZ)=90THENRETURN rrem 114 
44545 PRINTCHRS$ (144) CHR$(PEEK(2ZZ))CHR$(PE 
EK(ZZ+1))CHR$(61); trem 198 
4455@ Z1=2f (PEEK(ZZ+2)-129) trem 251 
44560 22=128:23=256:24=1 trem 62 
44570 Z5=PEEK(22Z+3):1FZ5>=128THENZ5=Z5-12 
8:Z4=-1 rrem 123 
44580 29=21+25*Z1/Z2+PEEK(ZZ+4)*2Z1/22/23+ 
PEEK (2Z+5 )*Z1/2Z2/23f2+PEEK(2Z2Z+6)*Z1 
/22/23%3 srem 78 
44590 PRINTZ9*Z4 trem 222 
44600 RETURN rrem 222 
BEFORE TYPING... 


Before typing in ay grams, please refer to “How 


ue Type COMP 


’s Gazette Programs,” “A 


Beginner 's Guide T To Typing In Programs,” and 


e Automatic Proofreader” that appear before 


the Program Listings. 





Checksums 
For Early GAZETTE Programs 





In the January issue, we asked for reader response 
concerning checksums for early (July-October) 
GAZETTE programs. Response was great, so we've 
chosen some of the longer and most difficult-to- 
type programs. 

If you've already typed in a program, you 
can use “Automatic Proofreader” to check each 
line of the program, Disk drive users can LOAD 
and RUN Automatic Proofreader, then LOAD the 
program to be checked. If you owna cassette drive, 
see the special loading instructions below. 

When the program to be checked has been 
LOADed, type SYS 886 to start Automatic Proof- 
reader. LIST the program and stop when it fills 
the screen (remember that CTRL will slow the 
listing and RUN/STOP will stop it). Position the 
cursor on the first program line and hit RETURN. 
The checksum number will appear in the upper 
left-hand corner. Press RETURN again and you 
will see the next number. When you reach the 
bottom of the screen, LIST the next section of the 
program. 

If you're typing in one of the programs below 
for the first time, LOAD and RUN Automatic 
Proofreader. Then type in the original listing while 
comparing the checksums. 


Special Notations 


There are a few symbols in the listings which 
should be noted. First, any letters appearing to 
the left of the line number represent the month 
(O for October, D for December, etc.) in which a 
necessary correction was made in “‘Bug-Swatter.”” 
We've not included minor modifications. The 
letter appears only if the contents of the line are 
different from the original listing. Refer to “Bug- 
Swatter’ in the issue noted for the correction. 

An asterisk (*) following a line number indi- 
cates that there were too many characters per 
logical line; therefore, the checksum is meaning- 
less. Remember, the VIC accepts no more than 88 
characters per line, and the 64 no more than 80. 
In cases where you see the asterisk, you can split 
the line by creating a new line number. For ex- 


ample, if line 350 is too long and the next line 
number is 360, simply create line 355 and type in 
a latter section of line 350. (After a colon is always 
a safe bet.) A better alternative is to type in the 
statement using keyword abbreviations (? for 
PRINT, P SHIFTed O for POKE, etc.). 


For Tape Users 

Because Automatic Proofreader is a machine lan- 
guage program that fits in the cassette buffer, it is 
erased when you load a program from tape. To get 
around this problem, follow these instructions: 


1. LOAD and RUN Automatic Proofreader. 
This will put the machine language program into 
the cassette buffer. 

2. Type the following lines in direct mode 
(without line numbers): 


AS$="PROOFREADER.T": BS="{1@ SPACES}": FOR 
X = 1 TO 4: AS=A$+B$:NEXTX 
FORX= 886 TO 1618: A$ = A$ + CHR$(PEEK(X) 
) sNEXTX 
OPEN1,1,1,A$:CLOSE1 

After you type the last line, you will be asked 
to press RECORD and PLAY. We recommend 
that you start at the beginning of a new tape. 

You now have a new version of Automatic 
Proofreader. Turn your computer off and on, 
then LOAD the program you were working on. 
Put the cassette containing PROOFREADER.T 
into the tape drive and type: 


OPEN1:CLOSE1 





You can now get into Proofreader by typing 
SYS 886. To test this, PRINT PEEK (886) should 
return the number 173. If it does not, repeat the 
steps above, making sure that A$ (PROOF- 
READER.T) contains 13 characters and that BS 
contains 10 spaces. 

The new version of Automatic Proofreader 
will load itself into the cassette buffer whenever 
you type OPEN1: CLOSE] and PROOFREADER.T 
is the next program on your tape. It will not disturb 
the contents of BASIC memory. 
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July 


Snake Escape (VIC) 
186 :212 7018 2256 

116 :186 7628 :806 

120 :247 7038 :194 

138 :199 7049 2236 

148 :247 7058 :683 

158 :246 7668 :999 

166 :817 7078 :174 

176 :119 8900 :085 

188 :119 8005 :113 

190 :@57 8018 :186 

206 :198 8820 :178 

210 :235 8838 :176 

228 :118 8648 :951 

238 :219 8945 :126 

248 :162 8858 :225 

258 :232 8068 :809 

260 :245 8670 :122 

278 :846 8089 :132 

288 :189 8898 :128 

308 :125 8100 :124 

318 :014 8118 :268 

4008 :234 9908 :111 

4919 :126 9810 :2168 

4926 :618 9629 :201 

4938 :631 9838 :144 

4049 :112 9949 :227 

4656 :G91 9858 :G42 

4960 :151 9069 :175 

4976 :178 9590 :126 

4980 :188 9518 :O51 

4998 :189 9520 :046 

4199 :165 9538 :251 

5888 :217 9548 :183 

5616 :124 9559 :189 

5626 :127 9568 :174 

5839 3138 9578 :872 

5835 :137 9586 :224 

5649 :169 9590 :623 

5858 :073 9608 2261 

5860 :907 9619 +123 

5078 :987 9628 :157 

5888 :136 18808 :242 
5098 :225 28000 :143 
5199 :261 29900 :1468 
5118 :242 29818 :697 
5120 :189 300090 :200 
6909 :G48 30018 3672 
6005 :238 30626 :104 
6019 :194 30038 3173 
6628 :849 38048 

6825 :198 30058 

6038 :123 38860 

6949 :886 36878 

6958 :215 38689 

6868 :122 38698 

6670 :214 361998 

6088 +247 361198 

7090 :187 36128 
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Snake Escape (64) 

5 3255 6625 :139 
10 :957 6926 :173 
15 :059 6927 :151 
28 :136 6828 :142 
38 :867 6948 :627 
198 :239 6059 :215 
116 :186 6969 :122 
128 :247 6970 :214 
138 :199 6088 :228 
149 :247 7006 :863 
150 :2498 7010 :253 
168 :017 7020 :848 
178 :119 7038 :227 
188 :119 7648 :154 
198 :057 7842 2162 
288 :195 7043 :176 
218 :237 7645 :197 
228 :113 7658 :083 
230 :219 7968 :899 
248 :182 7078 :174 
258 :232 8906 :185 
268 :245 8885 :113 
278 :846 8919 :194 
288 :189 8820 :179 
308 :896 8838 :177 
318 :126 8948 :G852 
4808 :234 8645 :137 
4919 :869 8859 :225 
4628 :163 8868 :GB9 
4930 :965 8978 :122 
4948 :112 8888 :132 
4058 :891 8998 :128 
4060 :151 8188 :124 
4978 :O57 8119 :268 
4989 :166 98BB 3200 
4999 :189 9919 :195 
4100 :165 9628 :171 
5888 :893 9930 :126 
5018 :124 9848 :225 
5828 :127 9959 :8308 
5838 :136 9969 :175 
5035 :137 9508 :173 
5848 :169 9585 :188 
5058 :158 9519 :141 
5069 :907 9515 :179 
5978 :138 9520 :153 
5888 :059 9525 :147 
5898 :044 9538 :176 
5108 :158 9533 :156 
5182 :1062 9536 :149 
5193 :917 9546 

5106 :131 9558 

5128 :221 9568 

6008 :045 9578 

6903 :998 9588 

6085 :214 9598 

6919 :155 9689 

6828 :167 9619 

6921 :146 9626 

6022 :136 19899 :242 














28008 :141 30050 :054 
29808 :135 39978 :992 
29919 :697 39980 :641 
30008 :876 38098 :174 
30018 :077 39100 :228 
30820 :109 30110 :041 
30030 :178 30128 :214 
30048 :111 

Alfabug (VIC) 

1 :960 79 3003 

5 2147 88 :175 

10 :223 81 :114 

20 3193 85 :012 

25 +237 98 :087 

30 3994 108 3200 
34 3172 192 :094 
36 3131 195 :111 
4@ :242 110 3926 
5@ :097 115 :056 
55 3039 118 :155 
57 2249 120 :061 
68 :031 136 :123 
70 :002 149 3943 
75 :983 145 3604 
76 :218 158 :109 
717 3890 175 :037 
78 :989 208 :022 
Alfabug (64) 

® :031 85 :012 

1 365 98 :214 

5 2094 106 

6 :227 102 

1B :630 105 

20 3193 116 

25 :236 115 

30 3136 118 

34 3219 120 

36 3131 130 

40 :242 148 

50 :059 145 

55 3039 150 

57 3235 174 

60 :147 175 

10 :002 176 

74 :128 77 

75 :124 178 

76 :218 200 

717 3890 205 

78 2233 210 

719 :003 215 

88 :174 220 

81 2134 

Word Hunt (VIC) 

2 3919 5 2680 

3 2225 18 1123 

4 :216 11 3091 


12 :215 
13 :893 
14 3235 
28 :691 
25 :161 
78 3165 
88 :116 
98 :232 
95 :137 


168 

116 

128 

136 

148 

158 

176 

188 
196 
286 
2198 
228 
2368 
248 
256 
268 
278 
286 
2968 
295 
389 
318 
326 
348 
368 
378 
389 
496 
416 
436 
448 
450 
468 
476 
498 
596 
516 
526 
538 
558 
569 
578 
589 
598 
688 
618 
629 
638 
649 
659 
678 
689 
698 


2863 
2213 
2045 
3235 
2166 
2108 
2045 
2193 
2014 
2226 
2087 
2131 
2228 
2122 
2141 
3136 
2829 
2217 
37218 
3178 
2125 
2937 
2129 
2998 
2184 
2261 
2283 
2116 
2221 
2886 
2933 
7681 
2221 
2246 
2852 
2175 
2895 
3889 
7861 
3138 
2898 
2114 
2134 
2134 
32108 
2893 
2129 
2111 
2897 
2097 
3827 
2035 
2149 


718 
729 
748 
768 
778 
775 
788 
798 
889 
816 
826 
869 
861 
878 
889 
898 
989 
919 
928 
921 
938 
946 
958 
951 
966 
976 
9868 
1668 
1628 
1625 
186398 
1849 
1659 
1969 
1976 
1986 
1698 
1168 
1116 
11298 
1148 
11598 
11698 
1176 
1198 
1266 
1216 
1230 
1240 
1256 
1266 
1276 
12868 
1366 
1316 
1326 
13308 
1346 
1341 
1342 
1343 
1344 


7186 
3893 
2162 
2181 
2242 
2117 
2126 
2027 
2166 
2198 
2228 
262 
2175 
2214 
3179 
2228 
3159 
2874 
2204 
2149 
2164 
2207 
2168 
2204 
2226 
2133 
7848 
2245 
2252 
2243 
2938 
2284 
2210 
2122 
2156 
2156 
2215 
2126 
2178 
2158 
2154 
2183 
2126 
012 
198 
3163 
2112 
7118 
3649 
2175 
2203 
2213 
2824 
2065 
2849 
2817 
2151 
2978 
2214 
2612 
2061 
7063 








1345 :636 1528 :856 
1358 :201 1525 :649 
1360 :167 1536 :861 
1378 :213 1535 :138 
1388 :194 1548 :121 
1398 :157 1541 :679 
1488 :966 1558 :113 
1428 :889 1568 :925 
1438 :169 1579 :648 
1458 :173 1588 :623 
1460 :645 1598 :852 
1478 :632 1688 :818 
1488 :694 1616 :045 
1498 :983 1626 :826 
1491 :168 1638 :949 
1492 :886 1658 :206 
1493 :968 1666 :134 
1588 2862 1678 :253 
1505 :1508 1689 :119 
1518 :862 1768 :137 
1515 :059 

Word Hunt (64) 

4 :137 786 :254 

18 :224 798 :832 

1l :869 818 :839 

12 :133 1486 :694 
13 :@11 1491 :046 
14 :988 1492 :241 
98 :188 1493 :961 
295 :847 1528 :238 
388 :175 1525 :886 
318 :872 1527 :819 
328 :172 1538 :181 
430 :986 1535 :237 
775 :@55 1541 :169 
VIC Timepiece 

19 :188 388 :8798 

15 :155 319 :872 

28 :959 328 :067 

38 :694 325 :996 

58 :822 338 :253 

66 :175 349 :638 

76 :171 358 :639 

88 :999 490 :116 

83 :152 418 :626 

85 :253 428 :175 

98 :178 430 :913 

166 :@15 448 :267 

165 :136 458 :238 

118 :173 468 :262 

126 :190 588 :229 

138 :881 595 :@11 

148 :251 518 :119 

158 :2068 526 :111 

169 :229 525 :172 

176 :115 538 :@11 

260 :172 688 :199 

219 :618 685 :909 

228 :810 618 :165 


628 
638 
646 
658 
659 
668 
678 
688 
698 
695 
788 
716 
729 
738 
746 
758 
768 
906 
965 
9198 
926 
938 
1869 
1619 
1826 
1936 
1948 
1645 
1956 
1655 
1868 


2115 
2053 
2236 
2898 
2199 
2234 
2161 
3151 
3243 
2212 
2819 
2119 
2142 
2686 
2621 
37888 
2148 
2114 
2206 
2235 
3248 
3118 
2824 
3894 
2184 
2254 
2227 
2175 
2052 
2047 
7846 


1870 :141 
1988 :164 
1898 :169 
1166 :135 
1110 :162 
1120 :6398 
1130 :143 
2808 :647 
2005 :196 
2018 :676 
28015 :172 
2626 :202 
2036 :154 
2035 :198 
2048 :127 
2868 :119 
2088 :167 
2085 :166 
2690 :165 
2188 :057 
2118 :861 
2126 :198 
2186 :627 
2198 :144 
7999 3253 
8088 :828 
8619 :249 
8026 3249 
8925 :199 
8838 2087 
8849 :181 











August 


Wordspell (VIC) 

@ :242 

21 :159 47 3197 
22 :687 48 :876 
23 :254 49 :991 
24 :194 58 :254 
25 :237 51 3181 
26 2625 52 3242 
27 2205 53 :128 
28 :194 54 :869 
29 :132 55 :113 
38 :075 56 :196 
31 :872 57 3159 
32 :164 58 :698 
33 2007 59 :869 
34 :995 68 :255 
35 :238 6l 3%: 

36 2163 62 :157 
37 :194 63 :162 
38 :178 64 :638 
39 :876 65 :687 
46 :690 66 :635 
41 :693 67 :631 
42 :192 68 :117 
43 :126 69 :G21 
44 :252 78 2169 
45 :079 71 2857 
46 :241 72 «3245 
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73 2169 78 :628 
74 +069 79 :164 
75 2154 8B :G15 
76 :688 81 :039 
77 +162 82 :179 
Wordspell (64) 
an See 57 1202 
22 2007 38 88 
24 :194 2 3069 
35 5037 68 +255 
AE AEBS 61 3118 
27 3205 ee 
28 +212 Coos 
29 +132 64 :253 
30 1075 65 :136 
31 1072 66 :224 
aad 67 :060 
aaerady 68 :033 
34 2995 ey ee 
35 1238 A CR, 
36 2163 Teg 
37 2194 Ue ec 
38 2178 2) OMe) 
39 2076 74 2869 
40 :198 753154 
41 :693 ees 288 
42 :018 Tims 62 
43 :126 a8 2028 
; 9 316 
45 107082 2015 
46 :241 oe 
47 1255 Bom te 
48 :976 Bou Eee? 
49 :991 ih Cee 
50 +254 ee rd) 
51 :181 Be 
32 1242 198 :150 
53 :130 119 :141 
54 :069 126 :128 
55 3113 138 :094 
56 3196 149 :117 
VIC/64 Mailing List 
8 1209 29 3024 
19 +185 38 3153 
11 1616 31 3691 
13 1063 32 +115 
16 +199 33 2242 
17 +222 34 2152 
18 +213 35 2137 
19 :014 36 1127 
20 :* 37 :688 
21 :* 38 1256 
22 1208 39 2241 
23 1237 49 :149 
24 :695 41 :188 
25 3072 42 :199 
26 :879 43 :181 
28 3012 44-2243 
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45 :198 99 :253 
46 :G14 169 :149 
47 :628 191 :964 
48 :012 192 :214 
49 :645 183 :942 
58 :158 104 :117 
51 3217 196 :155 
52 +119 107 2178 
53 :611 198 :* 

54 :621 119 :161 
55 3859 112 :162 
56 :066 114 :629 
68 :678 116 :188 
62 3634 118 :054 
64 :214 129 :696 
66 2949 508 :207 
68 :134 518 :001 
78 :124 511 :003 
72 :839 512 :146 
73 3179 513 3225 
74 :196 514 :1198 
76 3142 515 :216 
78 3644 516 :063 
89 :611 Dalrieseqats ly) 
82 :678 518 :961 
84 :247 526 :249 
86 :192 538 :251 
88 :227 549 :253 
98 :014 550 :255 
92 3295 569 :961 
93 :953 5768 :G63 
94 :245 588 :905 
95 3174 590 :607 
96 :151 688 :039 
98 :992 618 :204 
The Viper (VIC) 

18 :110 258 2106 
26 :195 268 :204 
38 2136 278 :058 
40 :172 288 :237 
58 :660 299 :128 
68 :128 308 :079 
78 :135 319 :138 
8G :842 320 :817 
98 :640 338 :134 
108 :122 340 1856 
119 :668 358 2126 
128 :133 360 :007 
136 :162 378 +220 
149 :977 389 :G42 
158 :145 398 :113 
166 :174 499 :131 
178 :057 410 :105 
186 :211 426 194 
199 2233 436 :147 
288 :183 449 :244 
216 :247 459 :173 
226 :113 468 :087 
230 :054 47 :262 
249 :059 480 :268 











649 :141 
659 :922 
669 :175 
678 :001 
680 :938 
698 :059 
70@ :101 
718 :600 
72@ :121 
738 :249 
748 +245 
758 :131 
768 :007 
77® :@59 
788 :@45 
The Viper (64) 
109 :087 549 :028 
11® :022 558 :060 
12@ :156 568 :219 
138 :162 0576:184 
146 :918 588 :104 
158 :222 598 :202 
166 :124 600 :000 
176 :143 0618:161 
188 :626 628 :235 
198 :204 638 :939 
208 :237 640 :127 
218 :168 659 :195 
226 :675 668 :108 
238 980 678 :029 
248 3134 688 :254 
256 0699:254 
268 708 :016 
276 716 :199 
288 726 :153 
298 738 :013 
306 748 :125 
316 758 :@17 
328 768 :205 
338 778 3114 
348 786 :184 
356 798 :175 
368 : 806 :165 
378 +201 810 :237 
388 :106 820 :021 
398 :039 830 :174 
408 :998 848 :159 
416 :217 858 :859 
426 :188 860 :252 
436 878 :109 
449 889 :185 
456 898 :161 
460 968 :121 
476 918 :243 
480 926 :829 
496 938 :255 
509 948 3904 
510 958 :168 
520 968 :918 
530 978 :233 






















988 :010 1228 :625 305 :182 504 3232 570 :21 756: 
998 :244 1238 :172 318 :969 505 :* 575 ee 755 eel 
1908 :624 1246 :235 4G0 :044 506 :227 580 :157 760 :248 
1918 2229 1258 :175 426 1246 507 :172 585 :008 765 :001 
1628 1047 1268 :221 | 43g +119 508 :194 598 :096 77@ +248 
1830 :* 1276 :244 449 :215 589 :* 595 :245 775 :255 
1648 :858 1288 :189 450 :121 510 :* 600 :082 788 :143 
1958 :188 1298 :236 500 :* 511 :141 605 :215 785 :250 
1868 :068 1380 :193 501 :* 512 :192 610 :959 798 :942 
1978 :* 1316 :619 5@2 :251 513 :149 615 :124 795 :071 
1988 :088 1328 :672 583 :823 620 :061 899 :060 
1998 :199 1338 :213 625 :178 895 :119 
1108 :084 1340 :094 ; 
i11@ 1083 1358 1115 |C¥lonZap (VIC) Sect Maa, BiStiCa 
1120 :028 1360 :978 35 3093 338 242 640 :252 820 :192 
1138 :078 1378 :109 48 :102 335 3247 OG sern AEG ES 
1148 :247 1388 :177 45 :186 349 :128 650 +152 830 :924 
1150 :224 1390 :219 58 3005 345 3154 655 :163 835 :161 
1168 :104 1498 :983 55 :068 350 +222 668 :070 848 :168 
117@ :017 1416 :019 68 :198 355 2253 665 :101 845 :164 
1188 :054 01420:124 65 :199 360 :063 670 :246 850 :125 
1198 :@53 1430 :186 78 3051 365 3135 675 2038 855 :153 
1208 :163 1440 :055 75 :041 370 +152 680 :209 868 +154 
1216 :@23 1458 :969 88 :126 375 3232 685 :124 865 :149 
98! 256 388 2266 698 :025 876 :900 
Cylon Zap: Setup hee See we 695 :118 875 +206 
108 :131 390 3134 700 :217 B80 +213 
(VIC) 195 :211 395 :159 705 :238 885 1222 
19 :039 29 :000 118 +008 BOON 267 710 :196 890 :225 
115 3045 ave 220 715 :163 B95 :685 
126 :699 : F : 
Cylon Zap: 125 :104 415 :130 Tee ae con cieae 
Instructions (VIC) 130 :105 428 856 | 73g i909 © 918 2105 
135 1109 425 -:007 735 :073 915 :112 
18 :219 165 :182 149 :110 430 +223 748 :141 926 :118 
30 3232 176 :227 145 :161 435 3252 745 :221 925 :117 
35 :136 175 :138 158 :156 ae ren 
48 :120 188 :114 155 :163 3 
45 :074 185 :160 160 :161 450 :249 | Cylon Zap (64) 
58 3015 198 :146 165 :168 455 :191 168 :878 338 :* 
55 :202 195 :164 178 :123 466 :110 125 :054 348 :249 
6@ :153 200 :118 175 :132 465 :127 130 +252 358 2221 
65 :632 205 :241 186 :132 476 :147 149 :978 366 :* 
78 :067 218 :642 185 :141 475 3168 145 :208 376 :* 
75 3243 215 2235 196 :121 480 :224 159 :807 380 :058 
88 :033 220 :202 195 :211 485 :624 168 :181 390 :124 
85 :191 225 2207 200 :127 496 :224 170 :172 490 :219 
98 :098 230 :032 205 3206 495 :204 180 :@11 418 :005 
95 3121 235 :114 216 :118 588 :035 198 :887 426 :151 
188 :222 248 :015 215 :155 585 :095 200 :155 430 :147 
105 :992 245 :251 226 :128 510 :622 218 :243 448 :239 
110 :244 258 :176 225 2159 515 3017 228 :199 450 :174 
115 +228 255 3092 238 2172 526 :111 230 :028 468 :206 
129 :106 260 :035 233 :088 525 :124 240 3200 478 :136 
125 :198 265 :141 235 2068 530 :045 250 2141 480 :112 
136 :051 270 3208 2408 2135 535 :214 268 :869 498 :222 
135 :121 275 +134 295 :227 549 :172 278 304 500 :141 
149 3226 289 :238 300 :042 545 3075 280 :* 510 :155 
145 2155 285 :229 316 :116 550 :151 290 :812 528 :123 
156 :151 290 3056 315 :121 555 2222 300 :141 538 2242 
155 2151 295 :113 328 :147 560 :072 310 :* 548 :048 
169 :238 308 3105 325 3015 565 3158 320 :* 559 :237 
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568 :217 113@ :115 1745 :121 2278 :234 12 72 2166 
578 :218 1149 :146 1750 :175 2288 :158 13 8G +242 
588 :040 1158 :617 1776 :183 2296 :@15 14 90 :017 
598 :118 1160 :247 1788 :136 2300 :623 15 92 :981 
608 :807 1178 :626 1798 2123 2318 :236 16 93 2066 
618 :239 1186 :181 1868 :169 2320 :205 26 94 3661 
611 +001 1190 :097 1810 :194 2338 :177 21 104 :189 
620 :186 1200 :147 1820 :211 2348 :169 22 106 :802 
638 :998 1210 :049 1836 :226 2350 :@72 23 198 :@82 
649 :646 1228 :057 1846 :198 2360 :134 58 169 :987 
656 :148 1230 :057 1850 :617 2370 :023 51 110 :085 
668 :212 1249 :668 |1860 :128 2380 :067 52 111 :648 
678 +142 1250 :166 1870 :220 2390 :158 54 159 :058 
680 +242 1260 :207 1880 :158 2400 :148 55 152 1032 
708 2104 1270 :216 |1890 :@82 2410 :633 56 154 : 
718 :644 1286 :213 1986 :064 2420 :036 58 156 :244 
711 3166 1296 :216 1916 :216 2430 :185 68 158 :186 
712 1699 1300 :222 1926 :172 2448 :632 62 166 +117 
720 +225 1310 :227 |1930 :157 2458 :980 64 164 3+ 
721 2140 1320 :232 1948 :256 2468 :003 66 166 +144 
738 3227 1338 :237 1958 :223 2476 3006 68 168 :046 
735 :131 1348 1968 2125 2480 :061 70 17@ +111 
758 3178 1356 1976 :197 2498 :696 

76@ :253 1360 1980 :017 2580 :204 

710 :126 1378 1990 :128 251 :087 September 
780 :222 1380 2000 :198 2520 :* 

798 2128 1396 3919 2902 2530 +127 Demon Star: 

808 :051 1490 : 2540 :203 

810 :218 1419 2038 :239 9559 3205 Main Program (VIC) 
829 3110 1426 2049 :694 2568 :078 1 318 35 :855 
825 :071 1436 26568 :* 2578 :209 2 :187 36 2229 
838 :012 1448 2068 :165 2580 :175 3 3968 37 3228 
835 :176 1456 2078 2886 2590 :226 4 3074 38 :216 
849 :113 1468 2686 2028 2680 :196 5 2012 39 :215 
845 3057 1478 2698 3183 2610 :076 6 :057 48 3202 
850 :162 1488 2108 :231 560g :184 | 7 2198 41 :146 
855 :809 1499 2118 2156 2638 :045 8 :179 42 :235 
868 :116 1588 2128 2165 = 2649 3957 9 :162 43 :083 
865 :065 1510 2138 :042 2659 3963 | 18 :068 44 :909 
878 :008 1526 2148 2226 2660 :861 1l :226 45 3027 
875 3168 1536 ee ey 2670 :068 12 3068 46 :186 
888 :055 1549 Ry 2680 :104 47 :108 
885 :158 1550 By ye Ceca 48 :151 
898 :017 1566 6 1248 2708 :129 49 +082 
895 :120 1570 Ca Hit ce 50 :195 
908 +052 1580 ae ee 2728 :175 51 :224 
985 :137 1590 Hi eten. Use) eens 52 :087 
918 :030 1608 220s 2749 :218 53 :184 
915 3146 1618 2220 :871 ©9759 +221 54 2258 
920 :174 1620 2298 2161 5769 2224 55 3836 
925 :113 1630 2240 3251 0 997g 2227 56 3096 
930 :126 1649 2250 3206 57 +167 
93520045) 1658 [F22SER NESSES Lek ys ae A 
948 :153 1668 : 
1008 :090 1676 The Beginner’s 69 Oe 
1960 :184 1680 ny 61: 
1078 :231 1690 Corner: Keyboard 62 :208 
1980 :165 1700 2 :219 7 3968 63 2252 
1996 :239 1710 3 3067 8 :251 64 :026 
1188 :998 1720 4 :077 9 3873 65 :241 
1116 :194 1730 5 3086 18 :032 66 :229 
1126 :262 1749 6 3203 11 :117 67 :018 
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68 :113 72 2169 
69 :224 73 :688 
78 :162 74 243 
71 :623 75 :197 
Demon Star: 

Data File (VIC) 

18 3120 168 :226 
28 :247 178 :219 
38 3200 186 3235 
49 :255 199 

58 :612 208 

66 3874 216 

166 :869 228 

116 :183 230 :242 
128 :018 248 :643 
138 :128 258 :621 


148 :866 268 :231 
158 :128 999 :136 


Demon Star (64) 
98 3230 486 :033 
108 :181 498 :032 
110 :086 508 :002 
120 :080 510 :001 
130 :181 520 :648 
140 :671 530 :248 
158 :221 546 :830 
168 :134 558 :683 
170 :066 560 :103 
188 :164 570 :129 
198 :188 580 :073 
208 3062 590 :159 
210 :123 608 :193 
228 :119 618 :175 
238 :007 620 :049 
248 :250 630 :004 
250 :182 640 :137 
268 :102 658 :030 
270 :161 669 :696 
288 +138 678 :130 
298 :621 680 :142 
308 :003 699 :229 
318 :020 708 :239 
328 :101 716 :111 
330 :139 726 

349 :193 730 

358 :150 740 

368 :198 758 

378 :064 768 

380 :150 7710 

398 :175 780 

490 :191 7908 

410 :190 800 

428 :035 810 

438 :029 820 

449 :056 830 

458 :101 849 

460 :107 850 

470 3196 860 

















878 :127 1618 2930 
889 :828 1828 :988 
898 :2963 1636 :968 
986 :621 2860 :913 
918 :132 2016 :142 
920 :671 2628 :138 
938 :134 20308 :199 
949 :233 2048 :143 
958 :218 2658 2127 
969 :235 2668 :144 
970 :187 2865 :998 
988 :012 20708 :169 
998 :136 3600 :918 
1880 :179 
Potholes: 
Initialization (VIC) 
18 :183 138 :684 
146 :862 
158 :688 
168 :963 
178 2252 
188 :253 
198 :254 
200 :064 
218 :603 
196 :615 229 :698 
116 :124 230 :247 
126 :264 258 :191 
Potholes: 
Main Program (VIC) 
166 :152 578 :168 
118 :057 589 :234 
308 :176 600 :G47 
318 :014 618 :128 
328 :819 628 :162 
338 :819 638 :198 
348 :922 1990 :192 
358 :126 1616 :951 
368 :178 1620 :136 
378 262 1848 :994 
496 :207 1658 :986 
492 :051 1968 :195 
493 :104 1198 :229 
495 :261 1119 :637 
416 :185 1126 :164 
426 :186 1206 :267 
430 :178 1218 :129 
449 :178 1226 :641 
458 :126 1238 :166 
469 :174 1508 :014 
506 :045 1510 :156 
516 2123 1526 2132 
526 :827 1536 2261 
538 :214 1796 :01G 
546 :682 1716 :997 
558 :199 1726 :915 
566 :093 1736 2183 














1748 :199 6938 :248 
3990 :187 6946 :291 
3018 :241 6196 :256 
3628 :198 6118 :195 
3939 :G19 16080 :135 
3198 :189 19018 :980 
3119 :238 16626 :104 
3128 2182 16939 

3138 2628 16949 

3289 :091 18956 

3218 :208 19066 :221 
3220 :248 10965 :188 
3230 :168 16970 :122 
3249 :990 16688 :141 
3258 :176 19690 :167 
4998 :008 19190 :916 
4961 :186 18119 :951 
4918 :169 16126 :233 
4926 :645 16138 :885 
4038 :239 16148 :196 
4931 :160 18158 :262 
4G4G :220 16266 :056 
4659 :196 19210 :937 
4969 :166 20909 :216 
4676 :210 20818 :159 
4671 :115 20020 :264 
6969 :181 20630 :104 
6019 :142 20948 :194 
6628 :253 29059 :215 
Potholes (64) 

78 :196 518 :123 
88 :123 526 :027 
96 :079 530 :214 
91 :179 548 :082 
92 :869 558 :199 
93 :186 569 :685 
94 :074 578 :168 
95 :241 589 :125 
96 2872 668 :047 
99 2958 618 :128 
118 :057 628 :162 
398 :176 638 :198 
316 :@11 1666 :192 
326 :619 1810 :651 
338 :623 1620 :136 
348 :024 1848 :694 
358 :120 

368 :178 

37G :262 

496 :207 

462 :051 

493 :104 

495 :201 

419 :185 

426 :186 

438 :178 

449 :176 

459 :126 

466 :174 

506 :645 
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1710 2087 19000 :135 
1729 :@15 19019 :889 
1738 :193 18628 21964 
1749 :199 10636 :218 
3000 :187 10648 :235 
30108 10050 :161 
3828 10066 :221 
3838 10065 :188 
3199 :189 18078 2122 
3118 :626 16088 :141 
3120 :148 19698 :167 
3130 :167 19196 :619 
3200 :691 106119 :651 
3228 :196 10120 :233 
3230 :653 10130 :685 
3258 :1708 19148 :196 
4990 :968 16158 :249 
4961 :186 18206 :856 
4910 :169 18219 :637 
4626 :045 20608 :216 
4938 :239 20618 :1108 
4931 :166 28628 :204 
4G4G :226 26638 :164 
4659 :196 29048 :194 
4968 :106 26656 :215 
4978 :210 30000 :087 
4071 :115 30816 :988 
6968 :181 38628 :689 
6618 :142 30030 :164 
6926 :194 39649 :183 
6639 :248 39058 :198 
6649 3201 30660 :G91 
6100 :256 38079 :145 
6110 :195 

Checkbook Reporter 
28 :966 80 :201 

23 2043 83 :035 
26 :204 86 :056 
29 :684 89 :150 
38 3249 98 :147 

32 3143 91 :209 

35 3187 92 2627 

36 +246 96 :252 

37 3247 97 :246 

38 :173 98 :863 

49 :241 161 :188 
41 :160 194 :255 
42 :243 167 :182 
44 :181 110 2926 
47 3207 113 2162 
58 :028 116 :646 
53 :216 119 :648 
54 :995 122 :194 
55 :@61 125 :169 
56 :963 128 :114 
57 3101 Ties 

58 :1063 134 :219 
71 :138 137 :999 
74 3622 146 :992 
77 =+:146 143 :191 
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146 186 :1008 
149 188 :985 
152 191 :977 
153 194 :984 
155 :182 197 :985 
158 :678 200 :144 
161 :629 203 :102 
164 :934 206 :@85 
167 :675 209 :188 
176 :618 212 :181 
173° 2123 215 2119 
176 :064 218 :917 
179 :221 221 :214 
182 :058 224 :205 
185 :234 227 :168 
States & Capitals 
Tutor: Main Program 
5 :149 195 :138 
18 :033 206 :026 
15 :@19 265 :198 
26 :212 216 :995 
25 :682 226 :145 
36 2236 225 :608 
35 3246 238 :039 
48 :811 235 :102 
45 :697 258 :204 
48 :231 255 :141 
58 :168 266 :241 
55 :218 308 :117 
68 :195 365 :818 
65 :158 310 :685 
7G :241 315 :108 
186 :289 328 :059 
165 :122 325 :889 
118 :@13 338 :193 
152255 335 :989 
120 :218 348 :697 
125 3162 400 :981 
136 :624 465 :054 
148 :216 408 :956 
145 :121 410 :977 
158 :969 415 :068 
155 :1987 430 :863 
178 2199 435 :618 
175 :184 449 :251 
188 :919 445 :093 
185 :915 458 :059 
196 :215 
October 
Aardvark Attack 
19 :121 19 :984 
12 :138 26 :G97 
14 :686 2272133 
15 3251 23 :873 
16 :173 24 :245 
18 :134 25 :189 











218 :176 
228 :119 
221 :189 
222 2634 
223 :134 
238 :999 
249 :126 
258 :261 
268 :234 
288 :225 
299 :627 
398 :097 


2198 
2243 
2163 
2139 
3164 
2192 
2111 
3028 
3874 
2207 
2152 
2024 
2191 
3144 


995 

999 

1899 
1981 
1962 
1863 
1694 
1268 
1219 
1226 
1238 
1246 
1256 
1266 
1276 
1286 


7088 
2117 
3895 
2115 
2135 
3133 
2026 
2063 
2182 
21308 
2203 
3025 
3088 
2136 
2127 
3128 
2831 
7168 
3193 
2629 
2193 
2114 
2119 
2924 
2009 
3248 
7066 
2128 
2678 
2123 
3139 
2898 
2066 
2075 
2626 
2842 
3218 
3262 
7146 
2125 
7026 
058 
2025 
3195 
2171 


eas a Oa ae 
Word Match (VIC) 


38 :021 
39 :232 
49 :667 
41 :123 
42 :227 
43 :684 
44 :087 
45 :168 
47 3124 
5@ 2223 
51 2217 
52 :236 
53 :261 
54 :124 


55 3877 
56 :813 
68 :084 
62 :199 
64 :214 
66 :191 
78 :149 
71 3176 
74 :238 
88 3072 
81 :162 
188 :143 
165 :692 
116 2226 
115 :218 
117 2022 
128 :687 
121 :980 
122 :189 
123 :@55 
124 :238 
125 
126 
127 
128 
129 
136 
131 
132 
135 
136 
137 
138 
139 
149 
156 : 
151 
152 





Word Match (64) 


106 :609 258 :118 
116 :254 268 :174 
128 :673 270 :822 
138 :155 288 :186 
148 :212 298 :138 
145 :252 308 :210 
156 :161 316 :165 
168 :639 326 :615 
161 338 :089 
162 348 :828 
163 358 :249 
164 368 :172 
165 370 :125 
176 388 :G61 
186 396 :138 
198 496 :253 
206 418 :091 
216 426 :G11 
226 438 :197 
2308 449 :224 
240 450 :028 











COMPUTE!|'s 


GAZETTE 
TOLL FREE 


Subscription 
Order Line 
800-534-0868 


NC 
919-275-9809 





TALK OR SING-The "64” responds 


IN YOUR OWN VOICE 





Enter up to 150 of your own words and phrases, 
Compute response with BASIC. Store word sets on 
tape or disk for unlimited selections. Easy for anyone 
t nd use. Complete with cassette software 
1@ to disk) with demonstration programs 
clock, and black jack, How to 
dofine every key as a spoken phrase or song note or 
other sound. There are so many applications and 
Special etfects it boggles the mind! Soon available 
for other popular computers, Software for word 
recognition to be available 


UNDER $70 
ASK YOUR DEALER 


WE CAN DEMONSTRATE 
OVER THE TELEPHONE! 


COvox Co. 

675-D Conger St. Eugene, OR 97402 
Tel: (503) 342-1271, Telex 706017 
Check, money order, or VISA/MC 
(Dealer inquiries invited) 























fe MONEY BACK 


GUARANTEE! 
SOFTWARE FOR THE 64 
1f you are not satisfied, send us back the 
program within 30 days for a prompt refund! 


TAPE 22.95 
TYPING COACH DISK = 2495 
Impress everyone with how quickly you've 
mastered typing. Typing Coach teaches from 
beginner to most advanced using games, typing 
drills and friendly timed tests. 
TAPE 24,95 
FINANCIAL GENIE isk — 26.95 
The most complete financial program available for 
the home. It's easy, and solves every need 
including budget, savings and loan calculations 
and checkbook balancer, 
TAPE 22,95 
CHECKBOOK 64 DISK 24,95 
Guaranteed to find money in your budget 
Complete record keeping system for all « 
transactions, cash or check. Sorts into over 100 
categories Quickly pays for itsett. 
Satisfaction Guaranteed or return within 
30 days for a prompt refund 


Add 2.00 handling 
Add 2.00 for C.0.0, 
Specify tape or disk 





‘Software Town Mastercard. Visa. C.0.D. 
P.O. Box 43. Call us. we'll ship tonight! 
Magna, UT 84044 (801) 250-2280 


All orders shipped within 24 hours. 
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TREASURE $2.97 tape for 
vic 20™™ 


C ‘NEW FROM FCP! 
EXPANSION PRODUCTS } sSureisiyvi-uve 








= FOR YOUR VIC-20™ : 





gw For You Who Care Enough To Use The Best 
g 24K RAM RS-232 CARD |MOTHER BOARD§ 


* Single board for all] * True RS-232 signallev-]* Adds 4 slots to the Ml 
RAM expansion uses} els provide maximum] memory expansion 

@ only one slot compatibility with | port 

a peripheral devices 

© Duel output connec- 

tors make installation 

asnap 


























uses joystick, no expansions 


Low power consump- 
tion provides cool, 

a reliable operation and 

rt extended product life 
* Fully VIC-20 compati- 
ble 


¢ Includes 3K of RAM -| 





TAXI 
FUN LAND 100 DRIVER 


es aa me () READING 
, i DEVELOPMENT 
tir a $12.97 disk for 


Commodore 64™™ 
uses paddles 





a 
ls A socket for a 2764 
EPROM Modular 
power supply to re- 
duce the load on your 


VIC 
$69.64 


© Fully compatible with 
VIC-20 hardware and 
software 













Hie Available in 8K, 16K, 
24K configuration 


$199.24 








$49.32 


ALL PRICES ARE FOB SANTA CLARA 


FALLMARC COMPUTER PRODUCTS, iNC. 
2565 Scott Blvd., Santa Clara, CA 95050 
Phone (408) 748-9208 









VIC 20 and Commodore 64 
are trademarks of 
Commodore Electronics Ltd. 


ARK INNOVATIONS, INC. 
ALL PRODUCTS ARE SUPPORTED BY A 2 YEAR WARRANTY! 18133 School St 
DEALER DISTRIBUTOR INQUIRIES INVITED Box 155 


VIC-20 ia a trademark of Commodore Business Machines, ine Amador City, ca 95601 
id Lil 


COMMODORE 6 SOFTWARE 


enh ead mss {0938 Loan Anazer.(CNOAKDNS.S0 Time Money Mager... (D100 ype Aad (oe 
New ane Re (hes Nae ‘end Ome she Way oat Ton 
emis (cnaias Onaica ioisads Ce Ma 7 
‘Avalon 77.00 
Arse itt eneson0s0 ney (chabes Type 8 Wier nad 
Telntad cou 7son099 {Bis Sereteron (Chad.8 Syehesound ee ioiasdo Seamer mits 
Nutewar (ONI5 i Cyber Maia 79.98 ey Diddle Diddle 
Mideny Campuige 2.0 A@HU78 98 Hes Welter 4 (C0045 Rindereomp, {pi2030 
TAC (0280 Getrunner (CT028 Spe Trey (Dae 
Computer cone ENE Spanan 3.95 en spue Reve (DI90.45, Fraction Fever (o23.68 
roa Inventory Mgmt 1D)40.00 fCienre Mlero Lear Amazing Thing (oar.co 
(D49.00 Music Theory Jags SAT Matht 7s et 
, (DH3.00 Mathematics 4.95 Dino Bags 30.30 Del ay 
(D)49.00 Thigh 95 9 Up for G 22s 
(CT27.00 Nevada Cobol (DHT te Soanle nsf GEMSes) 
Sea Pox (CT)27,00 (CT)T495, Visor Tratns 27,98, 
Moonshuttle (0,020.30 AD )23,98, ‘Adam Computer 


Serpentine (€T127.00 zon: Aerobics $ 
P (D129.80 poo Yan (w.c20.30 (DI23,98 ope. 2098 TT system... «$95.00 


tbizyso fn 40 SFist as 
war Sipe Genes eae fogs BeApsaose.... «0.02370 II Adatn Computer 
700 ey Mine D3 Shane ibe ode AAS, 
a0 27.00 Wingman 2688 Bueaer tryserpeg] fuiccatss Seas? 
si) 265 Dimension X (0,¢13.70 ff Disbetees 
cco ss BASF Sve" 
(D27.00 (D.€)23,68 Combat Leader (D)29.00 SSDD2Pak.....5.50 
(011690 condone pene Sia sabes ne Basen -- (buses pe 


‘onue (v.c110.% Sammy Lightfoot {bi2h80 Computer Baseball. (D}29.00 
Home Aevounts (DISS pet oes (029.00 Soft Box (10). .23.80 


Coleener une 
CP/MI2 System... ceT»9.00 eA {0)2030 {unar Leeper {D)a80 Ring Side Seat {029.00 ff Joyetieke 
% (0.00700 ne ow teri {Djis.0 Timeode Pointmaster 10.95 





a 
®@ Gold-plated contact fingers for long-lasting solid connection, 

















( teway to 
{1D)16.90 Creative Software cbszr.00 Oa Well {021.80 Dungeons of Algebra Pointmaster Pro 18.58 


Apsha 

(D)16.90 pital 33.88 pity Arcade Claties 5027.00 

(D)73.75 Pipes Jumpman Je (cna7.00 
Hes Software 


Learning W/Leeper (D)2LB0 Dragons (0,019.10 
cas Solvay Robbers of the 

Tormodl Dare LesiTom 1D.cn910 
sop State Bote (027.00 Mall Street (D009, 
ccrp27.00 Seats Bate {Dizses Money Manager (0,019.10 
Loge (cTH0.6G 9auieh 0 El 

Prot (013.$0(0)16.90 4s Ore Repton (0927.00 Eketonic | rer 
Pet Emulator Taventory  (CHO.ASD)II.50 NiAn EM tery as Bisse of Backpoote 5. ,(0)27.00 Checkbook He 


Easy Lesson/Quie 
Easy Finance (1:8) (10.14013.40: 


Terms and Ordering Information: To order call 1-800-527-8698 and send certified checks, money orders or personal checks {allow 2 weeks to clear), or use your 
Visa, Master Card or American Express, Inside Texas call 1-800-442-8717, Include $2 for P & H [C.0.D. orders add $1.65|UPS Blue Label 54, Canada $6 call 
‘for shipping charges on Hardware. Other countries include 10% for P & H, All products factory sealed with manufacturer's warranty. All returns require 
RAH. Prices subject to change without notice. Order desk hours: Mon-Fri 9-6,Sat 9-1 CST. meeeetic Keyed oor 


ATARI, APPLE, VIC 20, T.1,SOFTWARE LISTS AVAILABLE @hoala 


For further information and inquires call 214-753-0485 SORT aire) PO. BOX 2511  ipetiermtaiian 


FOR ORDERS ONLY CALL TOLL FREE 
Ouince rece Tio Texas Warehouse urls? LONGVIEW, TX. Gaaeyrraty 


800-527-8698 1-800-442-8717 = em 7006 veto 


$15.00 disk or tape. Add 
California residents add 64% tax. 


shipping 


WEREWOLP SOPTWARE 
Street 
Suite 353 
San Francisco, CA 94105 





FREE GAME FOR 
YOUR COMMODORE 64 





That's right! If you'll help cover shipping costs, 


KIDware will send you a free game along with our 
latest program brochure. cassette-based 












game, FOUR-IN-A-ROW, lets 2 players compete 
‘at trying to line up four pieces on a playing grid. 
Its fun for the whole family! 


KiDware specializes in K1D-oriented software 
(Cassettes and Disks) for the Commodore 64. We 
loffer a wide range of fun, educational programs 
Hor Kids 1 - 16 years of age, with emphasis in the 
younger years. Our prices are the lowest. and 
Jour quality and service the best—you get same 
day shipping on all orders! 


To receive your game tape and program brochure) 
send $1.50 (for shinping) to KIDware. If you 
lonly want a brochure, simply writ 








p.0. box 1664 
idabo falls, 
idabo 83401 


{ae 








Systems To Boo zap 


‘SOFTWARE DEVELOPMENT AND DISTRIBUTION AA 


—= PRESENTS = 


THE FIVE ADVENTURES THAT WILL DEMAND QUICK 
REFLEXES OF THE MIND, NOT THE HANOI 
+ ROCKET V-2 only $15.95 
+ DR. GEARDORF’S LASER only $15.95 
+ THE ISLES OF SSENKRAD 
(Part 1) only $15.95 
+ BENEATH THE ISLES OF 
SSENKRAD (Part 2) only $15.95 


+ SAND SCREAM only $18.95 
(Graphics for the C-64 that you must see) 


We Accopt Masti 
Allow 2 wks, for Personal Chee 

VIC-20 Requires Minimum 8K Expansion (ATARI, TRS-80 
Vorsions Coming Soon) 

‘Add $2.00 for Disk, Add $1.50 for Postage/Handling 
RUSH ORDER TO: SYSTEMS TO BOOT + 2109 S. 
Fioldcrest + P.0. Box 4106 » Wichita, Kansas 67204 
“ATARI, Commodore, TRS-20 are all registered 
spectively 


ard/Visa, Certified Chock, M.O,, 


sdamarhs 8 





VIC-20 / C-64 USERS 
CARTRIDGE BACK-UP 
© SYSTEM IS AN EASY TO USE PROGRAM 
AND A HIGH QUALITY CARTRIDGE INTER- 
FACE BOARD. 
© BACK-UP 
TAPE OR DISK 
© 8K RAM (MIN.) REQUIRED FOR VIC-20, 
ON BOARD FOR C-64 
VIC-20:$49.95 POST PAID 
€-64:$89.95 POST PAID 
A 
® EASY TO USE PROGRAMS. 
© BACK-UP ANY CASSETTE TAPE ONTO 
TAPE 
© REQUIRES NO USER MEMORY 
VIC-20:$14.95 POST PAID 
C-64:$14.95 POST PAID 
NOW CARRYING OTHER EQUIPMENT 
PLEASE CALL OR WRITE FOR PRICE LIST 
OF COMMODORE COMPATIBLE EQUIPMENT 
AND SOFTWARE 
VISA/MASTERCARD ORDERS: 
PHONE (215) 269-4803 
MAIL CHECK OR MONEY ORDER TO: 
E-M TECHNOLOGIES 
P.O. BOX 185 
DOWNINGTOWN, PA 19335 
PA. RESIDENTS ADD 6% 
6 MONTH REPLACEMENT GUARANTEE 


YOUR CARTRIDGES ONTO 





TRANS-TERM 2.0 


COMMUNICATIONS PACKAGE 


AUTOANSWER, AUTODIAL 
CREATE, SEND, RECEIVE FILES 
DOWNLOAD TO DISK AND PRINTER 


$34.95 
HOME INVENTORY 


PERSONAL MANAGEMENT TOOL 


FILE AND RETRIEVE IN 
UP TO 9 CATEGORIES, 
PRINTS REPORT WITH TOTALS 


$19.95 





For Commodore 64 with 
Disk & 1600 oF 1650 Modem 


For Commodore 64 
with Disk 


3480 S. Dixie Hwy, 
Dayton, Ohio 45439 
(613) 209-8555 


DEALER CALLS INVITED! 
“REPS NEEDED!” 





COMPUTE!'s 
Gazette 


TOLL FREE 


Subscription 
Order Line 


800-334-0868 


In NC 919-275-9809 
















57 DEVELOP YOUR CHILD'S 
FE” SPELLING & MATH SKILLS! 
Make the drudgery of | in and easy 
with Spelling Tutor Il and Math Tutor II. A uni 
que way to advance your child’s ability in 
learning. 


ening f 


MATH TUTOR II 
LANGUAGE TUTOR II 
SPELLING TUTOR II 
+ Menu Dri 


* Create Stude 


or Langu: 


= Tape $16.95 per 


# Disk $18.95 per 


Expansion Unit Unnecessary Specify VIC-20 of C-64 
Also available, MSD Super Floppy Disk 
Fall Line of MSO Products—Prowriter Printers 
— Send for FREE Catalog — 


VIC-20  cueck on Money onDER _C-64 
IL RESIDENTS ADD 6% SALES TAX 
SPH SOFTWARE 


FREE CATALOG ! 
HOME, EDUCATIONAL, AND 


BUSINESS SOFTWARE 
FOR THE VIC AND 64 











E. PEORIA, IL 61611 


New Items... 
Checkbook/64 (Disk) Handles 
all checking account data. $16.00 
Capitals/64 Teaches U.S. and 
Foreign capitals. Disk $10.00 
Tape $8.00 


Over 50 other titles! 
Low-Priced! Practical! 
Put your VIC or 64 to work with 
quality software from 
Farthest Fringe S.A. 
101 Highway Bivd. 
N. Pekin, IL 61554 
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Sor GAMBLING - 


Use your personal computer for expert 
handicapping like the experts do - - - 
* BASEBALL SYSTEM Complet nd pitcher match: 


up, strength and performance evaluation, strangest play 
rating 


 USFL FOOTBALL SYSTEM predicts winning margin 
and total points, 


© BOTH SYSTEMS Include. situation analysis, trend 
Analtls. and unique handcapping, quae, “simple 
‘gperating manual. Use with Radio Shack, Apple, 
Commadore 64 and eters. 


START WINNING WITH 


Send $225. (or elther System Includes free p— 
imoney mal program (werth $50) Enclose 
check, money order or Visa/MC card Mo, | CHS 


© WRITE FOR MORE DATA FREE 


COompPUTER 
HANDICAPPING 
SYSTEMS 


P.O. Box 33034 
Cleveland Ohio 


44133-0034 © Order today-Win tomorrow 


Advertise your 
program or 
product for the 
VIC-20 or 64 
here and reach 
hundreds of 
thousands of 
readers. 


LEROY’S CHEATSHEET™ 


ONLY $3.95 ea 


AT LAST! Th information yours 
back fo the manual, Those 
lays conn 

Ing. commands and odd 


Programmer's Ald 
Viemon 

Super Expander’ 
Heumon 

Cale Rowult (om 


Term 
Quick Brown Fox 


CHEATSHEET PRODUCTS” fe 
PO Box B20 Prtsburgh PA, 15218 (gy 











Micon WTEREACHER LIE Roe eee 
Bid you know that your VIC can be used to 
%9¢ toy motor so effectivel 
precision machine? Or th 
digital thermo 
ing to 
and othed28)intertacing projects: 
selected for usefulne¥e? ease of construction 
and low cost are detailed in the VIC-20 Inter- 
facing Blue Book, a veritable gold mina of prac 
tical information on now to build a variety of in- 
lerfaces for your computer, 
Projects include: Connecting VIC to your 
stereo, Pickproot digital lock; Capacit 
‘moter; Liquid level sensor; Telephone di 


; bit precision DIA: Bit 
MX80 Interface and more 
college professor in a triandly 

and informative style, the Blue Book gives you 

PE) theory of operation, schematics, “program 

ES] stings, parts list, construction ‘hints and 


if you want to get the most out of y 
FJ this book is a must. Cost is $14.95 (le 
POY s0¢ per project!). Price includes po 
> microsignal Dept. C 
0, gox 22 
fieiwooo hy 10840 


OZ-SIA 02-DIA O2-DIA OZ-DIA OZ-DIA OZ-DIA 07 





PROFESSIONAL FOOTBALL 
AN ADVENTURE TYPE GAME FOR 
Vic + 16K & Commodore 64 
Program Features 
11 Offenses & 11 Defenses 

Full Feature Scoreboard 
Includes down, distance, field 
position, clock, # 1st downs, 
and # timeouts, 

Computer selects its plays based 
on down, distance, field position 
& score & will run a 2 min drill. 

Sudden Death (for ties) 

Complete Statistics Given at Half 
and at end of game. 

* Includes Users Manual * 
(Cassette) 
$16.95 ppd 
@® Personal Checks Accepted SE 
VISA & MC Include Card # 
Exp. Date & Signature 
CMS SOFTWARE 
PO Box 4876 
Topeka, Kansas 66604—0876 


Commodore 64 Softwa 





Database system forthe Commodore 64 
* User defined printouts © 
* Menu Driven © 
* Sorts on any field * $27.50 
* Interfaces to other programs * 

* File & Retrive names, addresses, etc * 

* Can be used for business * 

* Easy to follow instructions * 

* This should be the first Database that you buy * 
40 Practical Programs - This disk for the C-64 contains 
40 different programs used for both Business and 
Personal computing. Financial Ratio Analysis, 
Decision Analysis, and Home Budgeting plus 37 
others. $37.50 






Project Mat 


‘This disk system provides an 
integrated da 


path method and 





pert network analysis program. Used for scheduling 
and estimating the cost and time necessary for any 
project. $87.5 


Other Programs » Send for our complete list of low cost 
personal and business software, 





Computer Connection 
1780 Austin Highway 
Bankcard 


San Antonio Texas 78218 


Uisaatity discal ayaianie 
vcore ves sve 





CONVERSE WITH 
YOUR COMPUTER 


At LASTI A FULL IMPLEMENTATION oth original ELIZA pro 
jab trun on 


rach sateen as youtype 

ponds withher own cemment or question and et 
namazingly appropriate! 

ELIZA has never bolo been 

od 


o 
How, our new Commodore 64 version possessing the FULL power 
And tango of expression ofthe orginal is boing oltered at the Itro- 
fauctory price of only $25. And f you wantto find out how 


(or teach her to do more) we wit include the completo 
PROGRAM for only 620 addtional 


order your cony of ELIZA today and you'll never again wondar how 
fo respond when youhear someone'say, "Okay, t's 868 Wha Ni 
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DISK DUPLICATOR 


FOR COMMODORE 
SINGLE DISK DRIVES 


(1540, 1541 and 2031 used with a 
VIC-20, commodore 64, CBM 4000 or 
CBM 8000 computer) 


DISK DUPLICATOR provides you a fast 
and easy way to make back-up copies of 
your precious, irreplaceable diskettes. En- 
joy the convenience of a dual disk drive 
without the expense, DISK DUPLICATORis 
100% MACHINE LANGUAGE, 100% FAST, 
and most importantly, 100% AFFORDABLE! 

Don't let an accident or mistake catch 
you without back-up copies of all your 
diskettes, ORDER "DISK DUPLICATOR" 
TODAY at the special introductory price of 
only $14.95 postage paid (check or money 
order only please). 


H&H ENTERPRISES DEPT. 1236 


5056 NORTH 41st STREET 
MILWAUKEE, WISCONSIN 53209 








Writers, 
programmers... 
COMPUTE!'s 
Gazette 
is looking for 
articles on the 
VIC and 64. 














Tired of just playing 
games? 


Challenge yourself to 
The Commodore 
Puzzle Book 
and get something out of 
having fun. 

















The Commodore Puzzle Book, by 
Gordon Lee and Nevin Scrimshaw. 
Baffling brainteasers that also teach 
BASIC programming skills. 


For those who want only the 
best out of computing 
Birkhiuser Books. 

144 pp. / Softcover / $7.95 
0:8176-3167-8 


Nov. 1983 


Birkhauser Boston, Inc. 


380 Green Street, Combriége MA 02139 
(617) 876.2335. 
















INTRODUCING K-COVER AN ANTI-STATIC 
UNBREAKABLE COMMADORE KEYBOARD 
PROTECTOR MADE OF ATTRACTIVE SMOKED 
GREY PLASTIC WITHMAR-RESISTANT RUB: 
BER FEET. K-COVER PROTECTS YOUR KEY. 
BOARD FROM OUST, DIRT, ANO WANDER. 
ING FINGERS. K-COVER ALSO DOUBLES AS 
ATILT RISER FOR COMPUTER OR MONITOR 
‘ANOCOMES WITHLIFETIME WARRANTY AGAINST 
BREAKAGE ONLY $7.98 PLUS $1.00 POS- 
TAGE AND HANDLING. CHECK, MONEYOR 
DER, VISA AND MASTER CARD ACCEPTED. 


fr 

















PENGUIN PRODUCTS 

P.O BOX 7008 

ROSEVILLE MICHIGAN 48905-7008, 
100) 732-0814 

13) 203-8210 













‘PUBLIC DOMAIN™ 
— SOFTWARE — 
Supporting all COMMODORE computers 
Written by users, for users 
+ GAMES % UTILITIES % EDUCATIONAL 


VIC 20™ 
collection #1 ~ collection #2 — collection #3 
collection #4 — collection #5 — collection #6 
70+ programs per collection ~ Tape/Disk ~ $10,00 


COMMODORE 64" 
64 collection #1 ~ 64 collection #2 ~ 64 collection #3 
64 collection #5, 
collection ~ Tape/Disk ~ $10.00 
PET / CBM® 
'y ~ Tapes/Disks ~ $10.00 each 
2/Disks ~ $10.00 
6 Educational ~ Tapes/Disks ~ $10,00 each 
DINSET™: Reset Switch 
Works on Vie 20 or Commodore 64 ~ $8.00 
All prices include shipping and handling. 
CHECK MONEY ORDERS, 

VISA and MASTERCARD accepted, 
For A Free Catalog Write: 
Public Domain, Inc. 
025 S. Rangeline Rd, W. Milton, OH 45383 
10,00 am. = 6:00 pm. EST— Mon. thru Fri 

(513) 698-5638 or (513) 339-1725 
ef Kareena does Rot at 
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Still investing in 
neo-expressionist 
art? 
Tune into the 


art of the future — 
Computer Graphics. 





Graphic Magic, by R. Baumann. Shows 
the sophisticated computer user how to 
exploit the full graphic and animation 
potential of the Commodore 64, Illustra: 
tive programs included, Give your BASIC 
programming skills artistic expression. 









For those who want only the 
best out of computing, 
Birkhduser Books. 





Apr 1984 / 180 pp. / Softcover / $14.95 


0.8176.3193.3 


Birkhauser Boston, Inc. 
380 Gre ge MA 02139 








NEW C-64 
SAIL TO AMERICA 


A totally new computer experience 


‘+ Parents Toll your kids Cadmoan's The Voyage of 
the Mayflower has all the color, sound and excito- 
ment they love. Challenge the mighty Atlantic, 
oly its roaring storms and bring your passengers 

ly to the new world. Thi 

‘perience like it. Anywhere. 

* Kida Tell your parents The Voyage of tho May 
flower s a torrtic learning adventure, Recroate the 
hazards and drama of the first Pilgrim voyage. 
Loarn about sailing strategy, weather, navigation 
‘and history. The more you know the moro fun itis. 
Every levol is a unique exporionce whether you're 
6 oF 60, Untorgottable, 

* Families Pit your imagination against the world as 
the Piigrims knew it, Share the exciting journey to 
«8 new life in a new land. Risk the danger and learn 
together how the Mayflower sailed into history on 
the courage of those few who dared. 

All this and a FREE 11 x 16 Poster for only $29, 

‘Schoo! and dealer inquiries welcomed 
DISK ONLY 

ORDER NOW. FREE shipping for MastorCard and 

Visa orders, Call (313) 994-0845 Day or Night. C.0.0., 

hacks, money orders add $3.00 shipping, 

CADMEAN CORP., 309 Koch, Ann Arbor, MI 48103 




















$49.95 


+ SING 





COMMODORE OWNERS..... GET ORGANIZED! 
Micro-console puts it all together 

+ Holds Keyboard + Holds Monitor 

* Holds 2 Disk Drives or Recorders 

+ Hides Cable Mess 


{All Metal Construction Reduces 
Interference Between Peripherals 


Attractive Finish Matches Vic and 64 


MICRO-CONSOLE 
(512) 964-2390 


RouteS Box925V Canyon Lake, Texas 78130 





EPROM PROGRAMMER 


PET' COMMODORE-64'- ViC-20' 
DELUXE-inctupes: il 
*MACH.LANG. MONITOR 5 
=mini-ASSEM/EDITOR — 
FILE MANAGER $99.50- 

for software devel nt &EPROM coding. 
PROGRAMS OVER 40 popular device 
types including 25xx and 27xx series 
up to 32K BYTES (incl. some E? ty, 


3). 
MENU DRIVEN software runs all 3 CPU's 
Connects to USER PORT. L.I.F. socket Incl. 


ECONOMY. 2716-64 
& ver, ONLY 

















ora 
ARE NOT needed-LIF incl. $59.50 ~ 


1 PET, COMMODORE 84,8,VIC 20 are tr 
(215) 256-6933 DaZco (215)256-6933 


(Zea) Box 267 Lederach, Pa, 19450 
OC) «+52, ship. &Pa, res. add 8% 














Has your valet 
left you to write 
a book on the 
Royal Family? 


Good help is hard to find 
but easy to program 
on the Commodore 64. 


Your Computer Butler, by Robert 
Tinker. A practical and lighthearted 
guide to cybernetics. Shows how to turn 
your Commodore 64 into a 
home-monitoring system, a personal 
message center. and more. 


For those who want only the 
best out of computing 
Birkhuser Books, 


Mar 1984 / 180 pp. / Softcover / $14.95 / 
0:8176-3197-6 


Birkhiuser Boston, Inc, 
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Telengard: How low can you go? 


We've created a subterranean monster. Fifty 
stories low. 

That's the number of levels in the TELENGARD 
dungeon. 

Each labyrinthine level holds hundreds of dark chambers 
and tomb-like corridors for the mighty adventurer to ex- 
plore. It goes without saying that a shifting collection of 
hideous monsters with unpredictable behavior patterns can 
make life in the TELENGARD maze quite interesting—and 
frequently quite short! 

Using wits, magic and true grit, your character delves 
deeper and deeper into the depths of TELENGARD in this 
realtime fantasy role-playing game. Available on cassette 

















for Commodore” 64, Atari® Home Computers (40K), 
TRS-80" Mods. I/IIl (32K) and PI 2001 (32K) for a 
ghoulish $23.00, 48K diskettes for Apple® II, Atari” , Com- 


modore” 64 and TRS-80* available also, for $28.00. 


AND FOR THOSE WHO DON’T DIG UNDERGROUND GAMES. . . 
There's B- 1 NUCLEAR BOMBER, a nail-biting solitaire simulation 
of a manned B-1 on a mission over the Soviet Union. Your plane is 
equipped with six Phoenix Missiles, a one megaton warhead and 
orders to retaliate! Cassette for Commodore 64, Atari Home Com- 
puters (32K), TI99/4 & 4A (16K), VIC-20 (16K), Timex /Sinclair 1000 
(16K), and TRS-80 Mods. I/II (16K) are available for an explosive 
$16.00. Diskette versions for Apple (48K), TKS-80 (32K), Atari (24K) 
and IBM (48K) just $21.00. 


+ Nukewar, 





QUALITY 


NUKEWAR: Defend your country by massive espionage efforts, or 
by building jet fighter bombers, missiles, submarines and ABM’s. 
Your cold and calculating computer will choose its own strategy! 
Cassette for Commodore 64, VIC-20 (16K), TRS-80 Mods. 1/IIl (16K) 
and Atari Home Computers just $16.00. 

FOOTBALL STRATEGY: Animated action on a scrolling field. A 
head-to-head challenge or solitaire as you select the best offensive 
or defensive plays in response to your opponent. Commodore 64, 
Atari Home Computers (52K) and TRS-80 Models I/II/IV (16K) 
cassette for $16.00. Atari (32K), IBM (64K) and TRS-80 Models 
I/II/IV (32K) diskettes available at $21.00, 

T.G.1.F.: Thank Goodness It’s Friday! Avalon Hill's new party game 
for one to four players recreating an often-not-so-typical week in 
the lives of the working class, Half the fun is just making it from 
Monday to Sunday, Commodore 64, Atari Home Computers (40K) 
assette for a meager $20.00, Atari diskette (48K) for $25.00, 
AVAILABLE WHEREVER GOOD COMPUTER GAMES ARE 
SOLD or call Toll-Free: | (800) 638-9292 for the name of a 
store near you. Ask for Operator C. 
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4517 Harford Road, Baltimore, MD 21214 U.S.A. Earth 


dy Corp... Apple Computers, Commodore Business Machines, Warner 
hunications and International Business Machines, 
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EasyScript 64 
Displays 764 nes '< 240. 
characters, Prints'to 130 
columns, Works with 
EasySpell 64) 






Easy Finance V— 





Easy Finance IlI— 












Rasy Finance I— 
Loan Analysis Advanced Statistics and 
12 loan functions. Bar Investment Forecasting 
graph forecasting as well 16 stock investment Analysis Assess present/future 
as calculation functions. Investment 16 capital investment sales trends with 9 
bar graph. functions. Bar graphs, statistics and forecasting 
junctions 


Ce commociore 

















Accounts Pa) Accounts General Ledger Inventory Payroll 
Checkwritin: Receivable/Billing 8 general ledger options Management 24 different payroll 

11 functions, Automatic 11 billing functions. Printed Custom income statement, 1000 inventory items. functions. Integrated with 
billing, 50 vendors/disk. statements. trial balances, reports. Full reports. G/L system. 


z commodore 


COMPUTERS 


First In Quality Software 


